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We would like to thank those members who introduced themselves at our stand at 
the London "Computer Fair" at Earls Court in June, it was nice to meet you. The next 
major show is the "Acorn User" show in Late August, this is almost certainly where 
the Acorn Electron will be Launched. The Model-A is being discontinued, this ties in 
with the Launch of the Electron. 


NEW SUBSCRIPTIONS & BACK ISSUES DEPARTMENT 

As part of a streamlining of our operation, we have moved the Subscriptions and 
Back Issues Department to the extremely efficient mailing agency currently used for 
software. Please make sure that you use the correct address for our various offers, 


and it helps if you do NOT combine orders for different addresses, as this delays 
matters considerably. 


HARDWARE PROJECT 
On page 19 we have an article entitled "Build Yourself a Light Pen". This is 


great fun, and good for experimenting with. This can be recommended as an ideal 
first hardware project, so do have a go. 


BEEBUG OFFERS 


We have Looked at the spread-sheet program "Beebcalc" produced by Computer 
Concepts, and in our estimation it comes up to the standards of Wordwise. We have 
managed to negotiate a similar discount for members. We have also secured a further 
discount on Wordwise, and pass this directly on to members. For full details of both 
offers see page 42. We will carry a detailed review of Beebcalc in our next issue. 


Following the Launch of the BEEBUG "Magazine Cassette", we are pleased to 
announce an annual subscription to this. See the back cover for details. 


EXMON is now available in EPROM, with the great advantages that there is no need 


to load it, and it takes up none of the Beeb's precious user memory. See the 
supplement for details of this offer. 


THE “AUSTRIAN CONNECTION"? 

X Thanks to those of you who responded to our plea and sent in User Guide errors. 
We have passed these on to Acorn who are incorporating them in a German version of 
the User Guide, this is to go with the Launch of the BBC Micro in Germany. 


1.2 OS and BASIC IT 
“The 1.2 OS has proved remarkably bug free, and it is unlikely that Acorn will 
release a new OS for some considerable time (if ever). It therefore seems sensible 
to recommend (strongly) that all users upgrade their machines to 1.2 at the earliest 
opportunity. We make this recommendation essentially because the 1.2 has a number of 
enhancements that are being made use of in recent software, and hardware add-ons, 
and this means that the amount of software that will run on a 0.1 system will become 
increasingly Limited. We have sold many thousands of these ROMs, and very few people 
have had any problems in fitting it themselves. 

A number of members have asked if we will be offering a similar deal on the 
Basic II chip. The answer is that Acorn have not yet decided how they will be 
marketing this chip, though they are considering marketing it as a separate entity. 


OTHER NEWS 

Acorn tell us that they now have a booklet entitled "Sideways ROMs". This is 
available from Cash Sales on 0223 245200 and can be ordered by credit card. 

M-TEC Computer Services now have a full "Torch BBC Basic" (v1.91) available at 


£110 plus VAT. If you had an earlier version, then the cost is only £15 when your 
old disc is returned. Contact: M-TEC Computer Services on 0605 870620. 


Please remember this is the Aug/Sept issue - no magazine next month. Sheridan Williams 


HINT WINNERS 


This month's hint winners are Matthew Rapier who wins £10, and Bjorn Grand who 
wins £5, Keep those hints rolling in please. 


DANDO BARNES GE GN 
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ADDITIONAL ITEMS ON MAGAZINE CASSETTE 


—————— EBEA EE LE EIT DELETE NET 


Epson 8-Tone Screen Dump ~ Both an very comprehensive one here. We 
article and the program are on the reviewed this excellent book in Vol.1 
magazine cassette. No.9 P.17 

"Assembly Language Programming for the Crossword Answers - Advance publication 
BBC Microcomputer" by Birnbaum. This of the answers to our crossword. 


book contains no index, we supply a Answers will be printed in the magazine 
| in the next issue. 
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UNDERSTANDING ASCII 
by Sheridan Williams 


Sheridan explains the essentials of 
ASCII codes. 


Like all computers, the Beeb uses a 
number code to represent each of the 
printable characters. This is based on 


the so-called ASCII code (American 
Standard Code for Information 
Interchange). For example, the ASCII 


code for the letter "P" is 88. You can 
print the character P in two ways: 
either by telling Basic to: PRINT"P" 

or to: PRINT CHR$8Ø. The CHR$ simply 
informs Basic to use the character 
code, and print the corresponding 
character. 


You can find out the ASCII code of 
any given keyboard character by using 
the ASC function. Thus: 

PRINT ASC"p" 


will print the number 89. 


The following program will print the 
ASCII code of any character input from 
the keyboard: 
lø INPUT"Press a key, then 'RETURN";A$ 
20 PRINT"Its ASCII code is ";ASCAS 
38 GOTO 19 
If you experiment with this you will 
see that no codes are printed outside 
the range 32-127. 


ASCII CODES IN THE RANGE 32-127 


On the BBC Micro 256 codes are used. 
Codes 32-127 are used to represent the 


following :- 

Codes Characters Codes Characters 
32- 47 sp-/ 91- 96 [ -` 
48- 57 Ø -9 97-122 a -zZ 
58- 64 : - Q 123-126 { - 
65- 90 A Z 127 delete 
'sp' represents the 'space' character. 


The three shaded ranges - the numbers 6 
to 9, and the upper and lower case 
letters form three important blocks. 


In practice, a few codes produce 
different characters depending on 
whether you are using mode 7 or one of 
the other modes. Complete tables of 
ASCII codes can be found in the User 
Guide on pages 486-492. The following 
program will display the codes from 32 
to 127 and their characters 
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lø VDU 14: REM Turn paging on 

20 FOR code%=32 TO 127 

30 PRINT ;code$; TAB(5) ; CHR$Code$ 
4Ø NEXT code$ 

SØ VDU 15: REM Turn paging off 


Lines 10 and 50 simply turn on and 
off the paging feature, so that the 
program pauses after each screenful. 
Try running the program first in mode 


7, then ir mode 4, to see the 
differences. 
The  'Monkeys typing Shakespeare’ 


gives a simple example of the use of 
ASCII codes in conjunction with random 
numbers. 


ASCII CODES BELOW 32 
These are known as "Control codes". 

They generate invisible characters 
which have certain special effects. For 
example, try PRINT CHR$12 and you 
should see that the screen is cleared. 
PRINT CHR$7 will produce ‘beep’. Other 
characters are used as printer control 
characters. CHR$2 for example turns a 
printer on. The effect of using such 
codes is also tabulated in the User 
Guide. It is more common to issue 
these aS VDU commands, so VDU 7 is 
exactly the same as PRINT CHR$7; One 
advantage of using a VDU call is the 
ability to string several characters 
together. Thus VDU 13,13,7 will execute 
two carriage returns followed by a 
"beep’. 


Unlike the first program in this 
article, the program below will give 
you the ASCII code for a larger range 
of keys selected from the keyboard, 
including those obtained by pressing 
the CTRL key in conjunction with 
another key. 

lø REPEAT 


20 chS=GETS: ch-ASCch$ 
30 IF ch>31 AND ch«128 PRINT ch$; 
40 PRINT TAB(2);ch 


SØ UNTIL FALSE 


This program will print the ASCII codes 


for the standard keyboard (Not 
"Escape', 'Break', function or cursor 
keys). If the ASCII code lies between 


32 and 127, then the program will print 
its ch t 
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ASCII codes are well thought out, 
and the layout of many of the keys is 
determined by them. For instance, using 
the program just given, see if you can 
find a relationship between CTRL-A, 
Upper case-A and Lower case-a. You will 
See the relationship more clearly if 
you print the  ASCII codes in 
hexadecimal rather than in decimal. You 
can do this by replacing line 40 in the 
previous program by:- 

49 PRINT TAB(2);^ch 
Note the ^ character before the ch, it 
instructs the computer to print the 
numbers in hexadecimal (base 16), 
rather than decimal (base 10). For a 
brief explanation of hexadecimal code 
see BEEBUG Vol.1 No.8 P.16. 


ASCII CODES ABOVE 127 


ASCII codes above 127 are reserved 
for Teletext characters in mode 7, and 
are available for you to define in 
other modes, these have been mentioned 


in previous issues of BEEBUG in 
particular 'TELETEXT' Vol.l No.4 P.7 
and  'GRAPHICS' Parts 1 and 2 in Vol.1 
No.2 P.9 and Vol.l No.3 P.11. For 
example, go into mode 7, (eg. by 
executing Break) then type VDU 
132,157,129: PRINT "RED TEXT ON BLUE 
BACKGROUND" 


As further illustration the following 
program allows you to see the effect of 
keyboard characters in the Teletext 
graphics mode. To enter the Teletext 
graphics mode you must use an ASCII 
code in the range 145 to 151 - 
depending on the colour (see BEEBUG 
reference card). 


1@ MODE 7 

20 INPUT A 

30 PRINT CHR$129;CHR$A;CHR$145;CHR$A 

40 GOTO 20 
The above program allows you to type in 
a number when the question mark 
appears, and it will the show you both 
the ALPHA character and the GRAPHIC 
character for that given code. For best 
effect in GRAPHIC characters you should 
use the ASCII codes in the range 95-126 
and 168-191 as shown on pages 488/489 
of the User Guide. 


To create your own graphics 
characters you need to be in any mode 
apart from mode 7. Then you tell the 
computer which ASCII character you wish 
to define. At its simplest, you can 


define any ASCII character from 
224-255. This is done using the VDU23 
BEEBUG MAG 
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statement (See the reference above for 
more details on precisely how tc define 


the characters). 


The following program sets mode 6, 
and then defines two characters 224 and 
255 as two space invaders 
(lines 28-30). It then displays them 
repeatedly: 


1] @MODE6 

2ØVDU23, 224,68, 126,219,255, 126,68, 36,66 
3QVDU23, 255, 129,98, 60,90, 126,68,66, 36 
AØPRINT CHR$224;CHR$255; 

5@GOTO 4Ø 


(NOTE: Although modes 3 and 6 are not 
graphics modes, 
user-defined graphics in them). 


ETTE EEE ETE TE 
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THE WATFORD ELECTRONIC 
DISC FILING SYSTEM R W 


by Colin Opie — 


Several factors such as the decreasing cost of disc systems, the shortage of 
official disc upgrades, and Acorn's policy of only supplying the DFS to dealers has 
prompted a number of suppliers to try and provide alternatives disc filing systems. 
One such supplier is Watford Electronics referred to from now on as WE. We have had 
a pre-release version of their DFS together with a manual here at BEEBUG for some 


time, and report below on our findings. 


PACKAGING 

The DFS will be supplied in a 16k 
EPROM (The Acorn DFS is 8k) and will 
have a manual to accompany it 
costing £7.50. The ROM fits as usual 
into one of the sideways sockets, and 
the manual is there to tell you all you 
need to know about using the Disc 
System. Cost will be around £42 for the 
DFS, and around £85 for the complete 
upgrade kit. Watford Electronics will 
exchange their DFS for the Acorn DFS 
for £38. ALL prices are exclusive of 
VAT. 


FEATURES 

The manual is quick to point out 
that the WE DFS is an enhanced version 
of the Acorn system. Indeed all the 
normal DFS commands are available (see 
BEEBUG Vol.1, No.10, P.25 for a List 
and explanation of these). What is 
impressive about the WE DFS is the 
extras which have been included. It is 
not possible, or necessary, to document 
these in full but the following is a 
summary of the features: 


1) An extra utility '*EDIT' is included 
which is a disc sector editor 
program. (Uncannily similar in Looks 
to the one in BEEBUG Vol.2 No.3!), 

2) A disc formatting program is part of 
the DFS Cie. not a file on a utility 
disc), as is a disc verifier. They 
can be accessed via *FORMnn and 
*VERIFY commands. An interesting 
point about the first of these two 
is that it gives you the option of 
*FORM80, *FORM40 and *FORM35, (for 
80, 40, and 35 track discs , as does 
the BEEBUG Formatter - BEEBUG Vol.1 
No.10). You can also ask for a "62 
file directory" as opposed to the 
normal 31 files allowed on the Acorn 
DFS. (More on this later in the 
article). 
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3) Four extra DFS commands exist, 
*MLOAD, *MRUN, *MOVE and  *WORK. 
*MLOAD and *MRUN are really 
utilities for automatically 
relocating programs which would 
normally be too big to run on a disc 
machine (eg. å program which was 
originally a cassette program). 
*MOVE is much the same as *COPY 
(standard DFS) but gives an extra 
Level of choice over uhich files are 
copied by requesting a yes/no 
response on all files which match 
the file specification. In this 
sense it is similar to *WIPE except 
that *WIPE is concerned with 
deleting files, while *MOVE is 
concerned with copying them. *WORK 
is very useful in that in enables 
you to specify a ‘work’ filename. 
After using this command you can 
simply type eg. SAVE"" , and the DFS 
will insert the name for you from 
the *WORK specification. Explicit 
SAVE and LOAD commands are not 
affected by | *WORK. Also the 
catalogue Listing displays the 
current *WORK specification. 


EXTRA HELP MESSAGES 


Two additional '*HELP' messages are 
supplied and accessed through 
*HELP FILES, and *HELP SPACE. The first 
of these will List any ‘open’ files - 
useful for debugging Basic file 
handling programs. The second will List 
all the ‘gaps’ on a specified disc so 
that you can see if it is worth 
compacting it (*COMPACT) in order to 


.gain more storage space. 


READING 40 TRACK DISCS 
Many of the drives available on the 
market are either 40 track or 80 track, 


it costs you extra if you want to have 
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far as it can in this respect by | CONCLUSION 


supplying a  *FX110 command which Watford Electronics have obviously 
enables you to read a 40 track disc in put a Lot of work into this DFS and 
an 80 track drive. there are certainly some welcome 
additions to the capabilities of the 
62-FILE CATALOGUES standard DFS. The cost is comparable to 
When formatting a disc the WE DFS that of a standard disc upgrade and 
will allow you to create a catalogue this DFS therefore appears to be good 
which can hold 62 file names, rather value for money. The one problem with 
than the normal 31. When using 80 track software of this type and scale however 
drives this is extremely useful as very is its degree of robustness and Lack of 
often you run out of catalogue space bugs. I have not found any real 
before you run out of storage space. clangers yet and I am assured that all 
Discs formatted in this way clearly known bugs have been removed. The DFS 
cannot be used properly by other has worked well for me during its use 
systems but the facility still exists (though I have not tested all the 
to create "standard" formatted discs so machine code Links and subroutines). 


no practical problems tend to arise. 


COLOURED FILENAMES - Peter Thorne 


Acorn's DFS permits the use of coloured filenames or disc titles, generated by the 
use of the Shift-Function keys. However the former will totally confuse the DFS when 
*CAT is produced, as it detects that the top bit of the first character of the 
filename is set and decides it has already output that name. This results in 
coloured filenames not being output by *CAT. It is thought that later versions of 
Acorn DFS will not allow the use of control characters in filenames, or even in the 
disc title. Watford Electronics DFS (see review in this issue) only permits their 
use in the disc title. 
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FORCING MEMORY CLEAR ON BREAK -  T.G.E. Bromilow 


*FX200,2 will cause BREAK to clear the entire contents of memory, from &4ØØ to 
&7FFF, omitting the zeroth byte of each page. This could be useful for software 
protection. 

(For more details on FX200 see BEEBUG Vol.2 No.3 P.34) 
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BEEN 


We present a crossword with a BBC 
Micro theme. The answers will be 
published in the next issue. If you 
would like to make up a crossword for 
publication please keep the total 
number of clues below 40; mark your 
envelope "CROSSWORD" and post it to the 
editorial address. We will pay £25 for 
any crossword published. ; 


ACROSS CLUES 


ee 


1. Confused crumpet has nothing else (8) 
4. Inverse of 66 across (3) 
f. What a computer's made of (8) 
11. 4 down & 55 down (well, almost!) (5) 
12. Position On Screen? (3) 
15. Control-L (3) 
15. Opposite of 18 across (3) 
17. Integer division (3) 
18. Basic equivalent of 
CASE X OF ----,----,---- (2) 
22. 250 in hex (2) 
= mms n ' 23. Bottom of variable storage (5) 
am frr mm blid 25. Quarrels over parameters (9) 


DOWN CLUES 27. REPEAT...----- (5) 
1. Security for headgear (4,4) 29. eg.Jam,Who,etc.... (3) 
2. Stirling worth £5.85 (3) 30. Royal Line in error (3) 
3. Ferranti took their time with it! 31. Machine code comparison (3) 
(11,5,5) 52. 5 down (abbreviation) (3) 
4. Plus (3) 33. Pull processor register from stack (3) 
5. Where you can stick your UHF output (2) 34. Ignore this Line! (3) 
6. VDU21 (ASCII abbrev p378 U.G.) (3) 36. Non-maskable interrupt | 
8. VDU20 (7,7,7) (abbreviation) (3) 
9. CHR$38, CHR$43 - both mean. ..(3) 37. Length of -a disc file (3) 
| 10. Container for ASCII 65 to 90 (8) 38. (pass*2-list) (3) 
14. Real wood? (2) i 40. Similar, often identical to 12 
16. Very Loud 255 (2) across (5) 
19. Function returning -1,0,1 (3) 42. See 25 down (5) 
20. Last six parameters of 10 down (9) 43. Output (5) 
21. Unknown quantity (3) 44, Unlucky character (2) e 
24. Way of navigating through memory (3) . 45. Basic command for a conditional 
25. and 42 across: Feature of the 6502, branch (2) 
something it has many of (10 and 5) 47. Backwards 18 across (2) 
26. Cornflakes and sweet red wine (6,4) pe pena 
EE RER &FDFF (3) 
36. Fishing job (7) 56. The flasher's gone red? No, quite the 
39. Key to use in prison (6) opposite! (4) | 
41. Routine at &FFDD (6) 57. Command mode statement that can be 
46. Characters used to print in hex (6) silly! (4) 
49. System for Linking Acorns (6) 28. ASCII 49 (3) 
51. To display current program (4) 59. Next to 1\down\-\what every user 
53. To add one to (3) should have! (7) 
55. Opposite of STR$ (3) 62. Inverse of 14 down (3) 
58. Routine at &FFF7 to interpret 64. Mistake? It sounds Irish! (5) 
command Line (5) 66. Hide from trigonometry? (3) 
60. Tie up bitwise flip-flop (3) 68. Enter from keyboard... (5) 
61. Execute Basic program (3) 70. My pen Leaked on the keyboard (5) 
63. ASCII 96 on Beeb (5) 71. Command virtually made obsolete 
65. Often defined on key 10 (3) by PROC (5) | 


67. Trigonometry used to kill dwarves? (3) 72. Ouput to speaker (5) 
69. Opposite of 65 down (3) | 
BEEBUG MAG August 1983 . Volume-2  Issue-4 


IICRONET 800 REVIEWE 


. by David Graham 


A Prestel/Micronet terminal for around £50 down and £1 a week. Is it too good to 
be true? David Graham Investigates. 


Micronet 800 costs £56.00 to join. successively through subsequent indexes 
There is in addition a rental charge of until you arrive at the desired topic. 
£1.00 per week. You may also incur ' À——À 
further charges if you access Prestel 
during office hours (or saturday before 
lpm), or if you make use of charged 
pages, or the teleshopping facility. 
ALL charges apart from the joining fee 
are added to your quarterly telephone 
bill. 


Micronet is a subset of Prestel 
accessible only to Micronet members. 
It offers an interesting range of 

"facilities for the BBC user. There are 
regularly updated pages, a classified 
ads section, a letter answering 
service, a new hints and tips section 

| | | and a telesoftware section. This latter 
For your money you get a modem which facility, together with Prestel's 


takes a standard telephone handset, and Mailbox service and a banking service 
which plugs into the RS423 port on the called Homelink, exploits the medium 
Beeb (Model B only). It is accompanied admirably, and each deserves a closer 
by software on cassette (at 300 baud Look. 
only, unfortunately). To access 
Micronet, you first load the software, MAILBOX 
then dial one of the Telecom Prestel The Mailbox area of Prestel allows 
computers on your telephone, then place you to send messages of all kinds to 
the handset on the modem. Once you any Prestel user, including comments to 
have entered your personal identity the Micronet team itself. You do this 
number (supplied by Prestel) and your by selecting a response frame, and 
password, you are logged into Prestel typing in and editing text. If you 
and Micronet; giving you a potential choose to send the frame, the addressee 
200,000 pages of information. (you get his Mailbox number from an 
on-screen directory) will be informed 
Each page is a full colour Teletext that a letter is waiting for him the 
screen, and takes only a few seconds to next time he logs on or off. He can 
download. As with Prestel, you can then access the frame which you 
select any desired page by keying in created. The full Mailbox service is 
the page number (you are provided with presently only available on the 
a printed index both for Prestel and Prestel's Enterprise Computer (London 
for Micronet). Alternatively you can Area), but other computers are expected 
use the extensive menu facilities to to offer this soon. By a similar 
find your way around. On Prestel you process it is possible to do 


can always begin on page 1, and branch teleshopping (with a credit card 
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number) or to order free brochures etc. 
These latter facilities are already 
available generally. 


TELESOFTWARE 

The system software supplied with 
the Micronet 800 kit allows you to save 
selected Teletext screens to tape or 
disc, or to send them to a printer. For 
this latter facility you must have a 
parallel connected printer (the serial 
port is used for the modem). Even more 
interesting is the facility to download 
software directly, at the press of a 
key. Some software on Micronet is 
free, and the quality of this is 
varied, others (such as a range of 
Acornsoft products) is charged to your 
next telephone bill. In either case, 
when you choose to download, the screen 
fills with mostly meaningless 
characters for a number of frames (a 
frame for every ík of program 
approximately). Error checks are made 
on each frame, and if there is an 
error, the frame is automatically 
re-sent. Once downloaded, you can 
press a key to save the program to 
cassette or disc, from where it can be 


chained in as normal at a Later date. 


This is a new facility currently 
offered jointly by Prestel, the 
Nottingham Building Society, and the 
Bank of Scotland. It allows Prestel and 
Micronet users to access deposit and 
current accounts, pay bills and call up 
on-screen statements, all from their 
keyboard at home. To join the scheme 
you must have at least £1000 invested 
with the Nottingham Building Society 
(but full interest is given on this). 
We shall be investigating this service, 
and will report back. In the meantime 
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further details can be obtained on 


page 444 of Prestel, or by dialling the 
operator, and asking for Freefone 
HOMELINK. Note that investors with more 
than £3000 on deposit, receive a modem 
from Homelink free of charge. 


or 


EVALUATION 


My privately | ordered Micronet 
apparatus took around 5 weeks to 
arrive, which was a little Longer than 
T had hoped, but by no means 
unreasonable. I should perhaps add that 
the reason that we have taken so long 
to review Micronet is that the review 
kit that we were promised months ago 
has yet to arrive. Eventually we gave 
up, and ordered one privately. This 
unit worked first time around, though 
the Prestel first page which requests 
your identity number invariably fails 
to appear, and small dashes appear at 
the top of the screen. These are 
responses to the keyboard. If you 
press the keyboard a few more times the 
Logging-on frame usually arrives. 


Generally the system software works 
well, though it could be improved 
somewhat by making it automatically 
configure for various operating systems 
etc (the user must do this manually at 
present). The software could also make 
better use ofthe function keys on the 
new operating system so as to allow the 
user to program his own keys with his 
favourite page numbers, and with his 
identity number to automate the 
Logging-on process. 


The only real problem which I 
encountered was caused by noise on the 
telephone Line. This can result in 
corrupted pictures, and can give 
problems with telesoftware; though the 
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Courtesy of VMS. Frame 344 


error checking mechanism 

faultless downloads in our tests. I 
personally found that a proportion of 
calls initially gave badly corrupted 
frames; though adjusting the position 
of the handset as suggested in the 
manual often solved the problem. 


In my own estimation, and in that of 
other members who have contacted us, 
using Micronet is a useful and 
entertaining adjunct to the Beeb. It 
provides a wealth of facilities and a 
myriad of pages through which to 
browse. The great thing about it is 
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that it is fully interactive, and that 
pages are regularly updated. Micronet 
clearly puts — Acorn's promised £100 
Prestel adaptor in the shade, though 
theirs is a direct-connect device with 
autodialling. Micronet too have one of 
these on the stocks. 


I am particularly grateful to Mark 
Sealey and George Foot for their 
detailed comments about Micronet. 


For further details, contact: 
Micronet 800, 

Durrant House, 

8 Herbal Hill, 

London, ECÍR 5JB. 
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DUAL SCREENS ON THE B 
by Colin Opie 


By using the techniques described in this article you will be able to set up and 
use 'multiple' screens for the purposes of display and switch between them 


in a 


fraction of a second! With a bit of ingenuity such techniques can be used to create 


extremely versatile demonstration programs. 


The version of the VDU23 statement 
which enables you to access the 6845 
CRTC chip registers, (rather than 
redefine characters), has appeared in a 
number of past  BEEBUG magazine 
articles: 

a) "Cursor Delete" Vol.l, No.3, P.26 
b) "Accessing the 6845" by John Yale, 

Vol.] No.8 P.29 
c) "Sideways Scrolling" (HINT), 

No.9 P.14 
d) "Working Memory Display" by G. 

Greatrix, Vol.2 No.3 P.8 


Vol.1 


and is also documented in the User 


Guide (P. 384). 


One extremely useful facility which 
can obtained through this statement, 
and which article d) above utilises, is 
the re-mapping of screen display 
memory. In other words it is possible 
for you to define the area of memory 
which is to be used for a given screen 
mode display (except mode 7 - the 
teletext mode). This article explains 
how this can be achieved, using mode 5 
as an example. 


In what follows I will look at the 
theory behind the process. You may wish 
to move straight to the section 
entitled "Running the program', and try 
out the dual screen demonstration 
program printed at the end of the 
article. 


THEORY BEHIND PROGRAM 

The 6845 CRTC chip is the device 
which controls the screen display when 
you are in modes Ø to 6. (It also has a 
part to play in mode 7 but its control 
is not So autonomous). Each of these 
modes uses up a certain amount of 
memory within your machine. For 
example, modes Ø to 2 use up 20k. When 
in one of these screen modes HIMEM is 
set to &3ØØØ and a Basic program may, 
on a cassette machine, use memory from 
&EØØ up to &2FFF. The VDU23 statemen 


jl 
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enables us to change the screen memory 
area, currently &3ØØØ to &7FFF to 
anything we like, though clearly it 
would not be terribly useful to assign 
the screen display area to 2@k of pure 
ROM! 


Coming back to the idea of multiple 
screen-page displays there is a 
practical constraint with regard to the 
amount of memory available to us. If we 
want to set up even two pages we would 
be in trouble in any of the modes 
except for modes 4, 5, and 6 - because 
modes Ø to 3 use between 16k and 20k 
each per screen, and therefore two 
Screen-pages would require between 32k 
and 4@k of memory when there is only 
32k of user RAM on a standard model-B! 
As such we will consider mode 5 as an 
example of multiple paging, and set up 
two screen-pages. The program which 
performs this task is listed at the end 
of this article and I will make 
reference to it as I describe the 
theory of operation. 


The first job is to inform the Basic 
system that HIMEM is not going to be 
what it thinks it should be for the 
chosen screen mode (see line 139). 
Normally  HIMEM is set to &5800 and the 
Screen memory area for mode 5 is 
therefore from &5800 up to &7FFF. To be 
on the safe side we have set HIMEM to 
&2FFF so that our second 'page' can 
reside in memory from &3000 to &57FF. 
The two main points which we need to 
concern ourselves about are: 


a) How can we write to our second page 
of screen memory? 

b) How can we switch (rapidly) 
the two 'pages'? 


between 


Let's consider first a method for 
writing into the second page. 


Screen addressing, in conjunction 
with possible scrolling, can often be a 
Secondly, the mapping 
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of characters’ to 
positions’ in modes controlled by the 
6845 CRTC is also fairly complex. It 
would therefore seem unwise to write 
relatively large chunks of program 
which would access screen-page two by 
"poking'. A quicker and easier approach 
is to set up the contents of page two 
using the normal screen area (ie. page 
one), and then block move the whole 10k 
of memory into page two (line 162). 
When that is completed, page one can be 
created. This is in fact what the first 
part of the main program does 
(lines 140-189). Once both pages have 
been created we can set up a loop to 
enable us to have control over which 
Screen-page is viewed (lines 200—249). 


Now let's consider the PROCedure(s) 
for changing the page displayed. ‘Two 
procedures are required in this case, 
one for each page, and in the example 
program these are called 'PROCpagel' 
and 'PROCpage2' (lines 260-340). They 
are identical in terms of "theory of 
operation" and therefore only one need 
be discussed fully. Suppose we look at 
PROCpage2. Registers 12 and 13 of the 
6845 CRTC hold the lowest memory 
address/8 that is to be used for the 
Screen display in any given mode. 
Register 12 holds the high byte and 
register 13 the low byte. We write to 
these registers by using the form of 
the VDU23 statement: 

VDU23,0,R,V,0; 0; 0; 
where R is the register 'address' (in 
this case 12 or 13), and V is the value 
we wish to place into that register. 
For our "page two" the lowest address 
used is &3000. The high byte of this is 
&30 which equals 48 decimal. Dividing 
this by 8 gives us the value 6. So, 
register 12 must have the value 6 put 
into it. The low byte of our address is 
zero and therefore register 13 must 
have zero written to it (see line 329). 
Coupled with this register change in 
the 6845 CRIC we also have to tell the 
1.2 Operating System what the current 
'high-byte' value of HIMEM is. This 
value is stored at location &34E, and 
for our 'page two' this will need to be 
programmed as &30. (This appears not to 
matter in OS 0.1). Using the above 
description of PROCpage2 you will be 
able to verify that PROCpagel is 


correct for the 'standard' screen-page. 


'character 


13 


RUNNING THE PROGRAM 


Type the program in and then save it 
on tape or disc. If you have typed it 
in correctly you will see the following 
happen:  'Page 2' will be created and 
consists of a block of yellow (or 
"bright" if you using a black & white 
set) space invader characters. After a 
couple of seconds delay you will see 
'Page 1' appear as a block of red (or 
'dark') space invaders in a slightly 
different position (watch the legs and 
feelers!). 


At this point the main loop of the 
program (lines 200—249) has been 
entered and typing a '2' will give you 
the 'Page 2' display. Typing a '1' will 
get you back to "Page 1'. Notice how 
quickly the display changes! When you 
get tired of this little demonstration 
it is necessary to get back to 'Page 1’ 
before pressing ESC, or simply press 
BREAK (followed by typing OLD if you 
want the program back). 


A good demonstration of the speed of 
this screen-page change can be observed 
if you insert the line: 

195 PROCpagel : PROCpage2:GOTO195 
into the program. This stops the main 
loop of the program from being entered 
and merely continuously swaps the 
screen display between the two 'pages'. 
On a colour screen you will obtain 
something very close to (extremely 
'frantic') orange space invaders! 


CONCLUSION 


The demonstration screens supplied 
in this article are extremely simple 
but it would be possible to create two 
quite complex graphics displays for 
whatever application you can think of. 
It would also be possible, for example, 
to have a disc library of 'page-2' 
Screen displays and these could be 
loaded quite transparently by the 
suitable use of: 

*LOAD picture 
within the program, provided they had 
been saved by eg: 
SAVE picture 3000 57FF 
A little bit of experimentation in 
these areas could enable an extremely 


versatile demonstration/teaching 
package to be produced - happy 
programming! 
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100 REM Multiple Screen Page Displays 320 VDU23,Ø,12,6,Ø:Ø:Ø:23,Ø,13,Ø,Ø:Ø: 
118 REM C.N.OPIE & A.WEBSTER - BEEBUG Ø: Ø; 
120 Version 1A 330 ?&34E-&30 
130 MODE 5:HIMEM-&2FFF 340 ENDPROC 
140 CLS:PRINT''"Page Two" 350 
150 PROCcreate page 2 368 DEFPROCcreate page 1 
160 FORIS=Ø TO &27FC STEP 4:! (&3ØØØ+I 370 COLOUR 1 
$) =! (&58ØØ+1%) : NEXTIS 380 VDU23,225,102,153,60,90,126,60,66 
170 CLS:PRINT''"Page One" ,129 
189 PROCcreate page 1 390 FOR down$-6 TO 14 STEP 2 
199 a 400 FOR along%=2 TO 16 STEP 2 
200 REPEAT 41% VDU31,along$,down$,225 
210 AS-GETS 420 NEXT along$,down£ 
220 IF A$="1" THEN PROCpagel 430 ENDPROC 
230 IF AS="2" THEN PROCpage2 449 | | 
240 UNTIL FALSE 450 DEFPROCcreate page 2 
250 460 COLOUR 2 
260 DEFPROCpage] 470 VDU23,225,129,90,60,90,126,60,66, 
270 VDU23,0,12,11,0;0;0;23,0,13,0,0;0 36 
sø: Ø; 480 FOR down%=6 TO 14 STEP 2 
280 ?&34E-&58 499 FOR along$-2 TO 16 STEP 2 
290 ENDPROC 500 VDU31,along%,down%, 225 
300 510 NEXT along$,down$ 


319 DEFPROCpage2 520 ENDPROC Ed 


EQUS EQUB EQUW EQUD IN Basic II - Matthew Rapier 


These four commands are used in the assembler to enter data bytes and strings simply 
into the machine code. This avoids the necessity to exit the assembler and use the ? 
and ! operators to generate blocks of data or look up tables e.g. ']:?P$-..:['. All 
these commands are used in this example: 


10 P$-&6000 6000 
20 [ 6000 46 52 45 
30 EQUS "FRED IS HERE" 44 20 49 
40 EQUB 13 53 20 48 
5Ø EQUW 65535 45 52 45 EQUS"FRED IS HERE" 
60 EQUD 123456789 600C ØD EQUB 13 
76 ] 6ØØD FF FF EQUW 65535 
RUN | 600F 15 CD 5B 
07 EQUD 123456789 


From this it can be seen that EQUS inserts a string, EQUB a single byte, EQUW a word 
(two bytes), and EQUD a double word (four bytes). 


snert terte OE AED OE EO OEC OLI tetas OQ RN ORO ee eta SED etatetatatetatetatatatetatatatatotatatetatatetetatatetetetatetatetetetetetetetetetatetetetetetstetstetetetetetetet8t.8.8.0.8.8 00 es eeeeeeeneseebouceceeeas 
s e 6 0-0 0 are 0707976 0707074 0 8 9 4 e, 
220364 ere ,*,*,5,*,9,9,9 he hee he ,* "Pu uo P, tuto otoca sore 0550594549 ,9,9,9,9,9,9 09,2 ,5,9,*,9,9 9,9 * 9 9 * 0 se uo o ote eua 


55500000000002 105000 1200 a ad ae ade ee eM TEEN EE er 
CORI SB a a aa an GI COGOR 
Sata at a a el al al al ad ald ad dd ad dd eed ted 0 v e o0 9€ 0 2 o t o de «o c o n o c a c o o o o o e ea o a e o e o au, 


KEY IN USE - Mark Hiseman 


This is an undocumented error, with ERR-250. It occurs when an attempt is made to 


alter the *KEY definition of a key whilst the contents of the key are being read. 
For example: 


10*KEY9,RUN|MLIST|M 
RUN 
(Press £9) 


The message 'Key in use at line 19° appears because the program tried to redefine 
key 9 before the LIST on the end of key 9 had happened. c 
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VISUAL EFFECTS USING TH 
Programs by W Lancaster & D Shread 


Quite extraordinary video displays can be achieved by re-programming the video 
controller chip, and Win Lancaster and Dan Shread have written a number of small 
programs that show the sort of thing that can be achieved. We have picked two of 
them and described them below. After Looking at these examples you may Like to try 
out some ideas of your own - and that's where the fun starts! 


Both programs are developed from an original article on the 6845 by John Yale 
(BEEBUG Vol.1 No.8 P.29). John Yale's article explained the format of the VDU23 
command used to program the 6845, and also the purpose for each of the 18 internal 
registers. 


EXAMPLE 2 =- SWING 


This program produces a ‘swinging’ 
circle going from Left to right and 
back again. Each time it reverses 
direction it changes colour. It is 
novel in the sense that it enables you 
to apparently view the circle from 
different angles. 


It works by first initialising 
the 6845 and the screen (Lines 20-50) 
and then drawing a circle 
| (Lines 60-110). At this point the 
| program enters a Loop (Lines 130-300) 
| which produces the ‘swinging’ display. 
| This effect is achieved by changing the 
| number of characters per Line 
| (line 175). 


| As the program is in mode 0 there 
| should be eighty characters per Line. 
If this is changed to 79 the first 
|| character of the screen will remain 

| exactly where it should be, but the 
Last character will no Longer fit onto 
the first Line and so it is used as the 
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LISTING PROGRAMS IN PAGE MODE - 


character of the second Line. 
Similarly the Last 2 characters of the 
second Line are put at the beginning of 
the third Line, and so on. The visual 
effect of this is to ‘slant’ the 
display in one direction. Increasing 
the Line Length will therefore result 
in a slant the other way. 


first 


1Ø REM SWING 

15 REM VERSION 1A 
20 MODE Ø 

38 VDU23,1,Ø 
35 VDU23; 2,1 
4Ø R=45Ø 


VDU29,64Ø; 512; 


MOVE Ø,Ø 
MOVE Ø,Ø 
FOR X=Ø TO 6.4 STEP PI/3Ø 
PLOT 85, R*COS (X) , R*SIN (X) 

MOVE Ø,Ø 

NEXT X 

A$=64 : FLAG=Ø 

REPEAT 
VDU19,1,4*FLAG*2; 0; 05; 0; 

FOR DELAY-] TO 200:NEXT 
VDU23; 1,A$;0;0;0; 

IF A$-196 FLAG-] 

IF A%=64 FLAG=Ø 

IF FLAG=] A$-A$-] ELSE A%=A3+1 
UNTIL FALSE 


P.J.LeSueur, J.P. Jakubovics 


jJ 


t] 
i 


ka 


When a program is listed with Ctrl-N selected it is very easy to forget to disengage 
page mode with Ctrl-O afterwards. This can prove extremely irritating when Shift has 
to be pressed to make a program function correctly. The solution is to define a key 


to do the 


listing, 


selecting page mode, 


listing and disengaging page mode 


afterwards. This only works if the program listing is allowed to terminate normally. 
If Escape is pressed the keyboard buffer is cleared so the Ctrl-O never happens. 


*FX230,1 


definition will happen. A suitable key defintion is: 


If *FX230,0 is not execut 


Switch all the sounds off, for instance. 
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*KEYU,*FX230,1|]M| ML. | M| O*FX230,0|M 
ed then Escape will not flush any buffers, so it will not 


Stops the buffer being flushed so that a Ctrl-O on the end of the 


el 
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ROTAX REVIE 


Tia 
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by Graham Greatrix 


Program: MICROTAX 
Supplier: Tax & Financial Planning 
Ltd, Barratt House, 
7 Chertsey Road, 
Woking, Surrey, GU21 5AB 
Prices £24.94 inc VAT 
Reviewer: Graham Greatrix 
Requirements: Model B, or 32k Model A 
(Not a disc system). 
Works on any OS. 


ass + 
w Sat m 
EN 


This is a complete tax system. It 
contains a cassette holding about 
220k of Basic in 15 programs. 
Supporting the cassette is a 
well-presented, readable and fully 
detailed UK income tax guide. The 
guide can be used on its own, and is 
similar to other guides available in 
book shops. Instructions for using 
the cassette on the BBC micro are 
contained on a card inside the 
Library case. Several forms for 
recording data produced by the 
programs are also included in case 
the user has no printer. It is quite 
difficult, when reading an ordinary 
tax guide, to know just what is 
relevant to your particular 
circumstances. When your tax return 
is completed, you may still be unsure 
as to whether you are a tax evader or 
a tax avoider. (It is illegal to be a 
tax evader, and you will be 
financially poorer if you are not a 
tax avoider). What is needed, is a 
program that will take you step by 
step through every stage of filling 
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in your tax return; that refers you 
to the relevant parts of the guide 
only when necessary; that keeps a 
constant check on your total tax 
Liability, and that advises you of 
the most advantageous tactics. This 
system does just that. 


The cassette programs Loaded 
satisfactorily and are automatically 
chained. ALL the displays are in 
mode 7 and well laid out. Most 
programs are between 30 and 60 blocks 
in Length and take quite a time to 
load. A disc version would be a 
distinct advantage here, but the 
cassette version supplied will not 
run directly if transferred to a 
disc. If you have a printer, the 
program will provide a print-out of 
all the important data. 


The printer procedure consists of 
finding the ASCII character at each 
of 960 successive screen Locations, 
and sending that to the printer. This 
produces rather too many blank Lines 
in the print-out. There are no 
CHR$(13) characters on the screen, 
and so the procedure needs to insert 
these at the end of each screen Line. 
Programs on Side A of the cassette 
did this satisfactorily, but not 
those on Side B. For example, line 
4060 in the final program reads PRINT 
CHR$CA); whereas it should read: 
VDUTLA:IF I MOD 40-239 THEN VDU 1,13 

When the system bypasses programs 
that are not relevant for your tax 
return, it asks you to advance the 
tape to a particular value on the 
tape counter, however cassette 
counters differ widely, so this can 
only be a very rough guide. 
Unfortunately, the screen clears when 
the cassette motor is turned on, so 
that the tape counter value is Lost 
from view. There were no other 
detectable errors or omissions which, 
considering the size of this package, 
is extremely good. Another point 
worth making is that it would be 


useful to use a colour TV/monitor 
because blue does not show up too 
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If you are an employee 
only one source of 


work through. If you are a director 
of several companies, with fringe 
benefits, income from foreign and UK 
sources as well as from investments, 
you had better advise your secretary 
to allocate a whole day. 


Altogether, Microtax is excellent 


GAIA ICICI IOI I itt 
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and have 
income, the 
package will take about two hours to 
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anything other than 
the simplest of tax returns. However, 
it is designed specifically for 
assisting with the 1983/4 return and 
for assessing your’ Liability for 
1982/3. You could need a completely 
new Microtax next year, and certainly 
whenever the taxation Laws are 
changed. The one aspect that worries 


us is the need perhaps, to buy a new 
copy every year. 


ie 
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OURSELF A LIGI 
by John Cole 


IT PEN (32k) 


Most people trying a light pen for the first time are delighted by the discovery. 
We are so used to TV screens being one-way mirrors that there is something magical 
about the ability to reach through in the opposite direction. Professional Light 
pens are quite expensive but it is possible for even the beginner to make one 
himself at a fraction of the cost. This article explains how. 


byte and R17 = Low byte), dependent 
upon the RAM address that is currently 
being used to create the screen. The 
number has a minimum value when the pen 
is at the top Left hand corner of the 
screen, and increases in unit steps to 
a maximum value at the bottom right. In 
any given display mode, the resolution 
is always much worse than the graphics 
resolution, but it may be better than 
one character position. For example in 
modes 0 to 2 the character resolution 
is 80x32. 


ALL this is probably more than you 
need to know to use the pen, but 


The BBC Model B has the provision certain consequences do have to be 
for a Light pen within the 'Analogue borne in mind to avoid some frustrated 
Input' interface, although the Light mystification: 
pen signal is in fact a digital one! 1. The pen needs to detect light, so it 
The particular pen described here is works best with solid white on the 
very simple mechanically, with all the screen and not at all with solid 
parts fitting within the barrel of a black. 
suitably wide pen (at least 7mm 2. When the pen is removed from the 
internal diameter). A common feature of screen the 6845 retains the reading 
professional Light pens is some form of when the pen was Last triggered. 
switch, used to inform the computer of 3. Since the position is measured by 
times when the pen signal is valid. pulse timing, an empirical 
This could readily be incorporated into adjustment needs to be made in 
our model although a neat mechanical software, not only for delays in the 
construction is quite difficult to pen and the 6845, but also in the 
achieve. Our demonstration program display device itself. For instance, 
compensates for the Lack of a switch by a monitor using the RGB input may 
suitable software. differ from a UHF colour TV by a few 


units of position. i 
4, Text scrolling changes the mapping 


HOW THE LIGHT PEN WORKS of the RAM to the screen, so either 
At the most basic level the pen begin afresh with a CLS or MODE 

functions as a detector of Light. The statement, or subtract the start 

TV or monitor display is formed by a address in R12/13 from the contents 

spot of Light that traces out the Lines of R16/17. 

making up the picture, left to right 

and top to bottom. In the Beeb this CONSTRUCTION 

"raster-scan" process ås controlled by The circuit and Layout are shown in 

the 6845 CRT controller chip (see Figures 1 and 2. Start by disassembling 

BEEBUG Vol.1, No.8, P.29). Every time the pen and discarding all the parts 

the spot passes the tip of the pen, the except the barrel and the plastic plug 


pen generates a digital pulse. This in 
turn causes the 6845 to store a number 
in two of its registers (R16 = high 
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Figure. 1 - All 
resistors are 1/4 


EI Tr 


or 1/8 watt carbon «CI avisos sopin! (45v) 
film. R2 should be JN SZ Np o pin9 (Ipstb) 
varied to adjust $$ o pin2 (Ov) 


I50cm 3amp 


sensitivity (see mains flex 


text). Tr] (TIL81) 
may sensibly be 
replaced with a 
'BPX25', 


Figure.2  - The} 
RL RA 4 components are| 
for clarity, but] 
they should  be| 
soldered close to! 
the 18 SWG wire! 
with Imm sleeving | 
on each lead. 


wire Plug 


end of the barrel and enlarge the hole value of R2. 

to 5mm to accept the phototransistor 
(TIL81). Stretch 20cm of 18 SWG copper 
wire in a vice to stiffen it, and wind 
one end twice around the flex to form 
a cable clamp touching the plastic 
olug. Cut the other end to a suitable 
Length and solder it to the emitter 
lead of the TIL81 (see figure 2 to see 
which is the emitter lead). Clip off 
Cor bend down) the small square tag 


For those conversant with analogue 
circuitry the main point of interest is 
that the speed of response of the TIL81 
phototransistor is improved by biasing 
it into conduction, and applying 
negative feedback to the base. If you 
can't get hold of a TIL81 for some 
reason then you could use a BPX25 
phototransistor, as this works equally 


next to the emitter lead. If all is as well. | 

well the TIL81 should reach neatly into We obtained all the components from 
the tip when the plug is replaced in MAPLIN Electronic Supplies at the 
the barrel. If this is not the case following address: PO Box 3, Rayleigh, 
adjust the length of the wire and/or Essex SS6 2BR. 

re-solder the TIL81. Now solder the 

D-connector to the far end of the flex Here is a full components List with the 
and solder the rest of the components MAPLIN part number and price. 


along the 18 SWG wire as shown in 
Fig 2, ensuring that the assembly will 
still slide inside the barrel. Finally, 
Look critically for wires that could 
short together and keep them apart 
either by forming a bridge with 
quick-setting epoxy or by using 
insulating tape. (This is specially 
important for the +5 volt connection). 


When the pen is finished, try it out 
with the demonstration program below. 
Ideally the pen should only work within 
3cm of a white screen, though this is 
dependent on the brightness and 
persistance of the screen. If it seems 
too insensitive try turning up the 
brightness control or increasing the 
value cfwresistor R2. If on the other 
hand it ist iti d se the 
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DEMONSTRATION PROGRAM ' PAINTER |! 

As far as the software is concerned 
the pen simply indicates what part of 
the screen is being pointed to, but 
according to the imagination of the 
software writer the apparent effect can 
either be as dull as choosing a 
menu-item in a business program, or as 


colourful as the stroke of a 
paintbrush. 


In our program you are presented 
with a white screen and a palette of 
colours. Run the pen from Left to right 
across the appropriate part of the 
palette in order to acquire a colour, 
and then begin to paint anywhere on the 
rest of the screen. To terminate the 
use of a colour, hold the pen still for 
a moment and the palette will 
re-appear. The screen can be ‘cleaned’ 
by pressing any key whilst the palette 
is displayed. 


The program is fun in itself and 
keeps children quiet for hours, but it 
also illustrates some techniques for 
making best use of the pen. For 
instance, the variable OS% in Line 280 
provides the .adjustment for timing 
delays. Increase or decrease its value 
by a few units until a vertical Line 
follows the pen directly without an 
offset to Left or right. The short 
assembler routine is used to read the 
6845 registers, because in Basic there 
is too great a chance that the high 
order byte will change before the Low 
byte can be read. 


For series 1 operating systems, an 
alternative will be to use *FX19 to 
wait for the start of a new frame when 
both registers must be static. The use 
of a simple digital filter (Lines 160 
to 200) means not only that a 
reasonably smooth Line. can be drawn 
despite the Limited positional 
resolution, but also that even black 
Lines already drawn can be overwritten. 
Perhaps the most important lesson of 
all is that, despite the absence of a 
switch on the pen, it can effectively 
be switched on and off in software, 
provided the program is planned with 
this requirement in mind. . 


You can change the resolution of 
the pen by redefining character 254 in 
Line 100 to be a smaller circle. For 
example: | 
100 VDU5,23,254,0,0,28 


g 
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and replace Line 210 with: 
210 PLOT69,XM$,YM$ 


Alternatively you could remove Line 220 


EE EUER EG PELEPET EET TET TET DET ETET TA TEET T ETTTEOTETTEETTTT OTT TEE TIT TTTTEETIT TETTE TTL LEOTE E TET FERE TET IST I 


lø REM PAINTER by J.Cole. vlA 

20 DIM P$ 100 

30 REM Assembler to read light pen r 
egisters of 6845 CRT controller. 

4G [.pen LDX#16:LDA#17:LDY#16 

BØ STX &FEØØ: LDX &FEØJ 

60 STA &FEØØ:LDA &FEQ] 

70 STY &FEØØ:CPX &FEQ1:BNE pen 

80 RTS:] 

9% MODE2:GCOL@, 135: COLOUR]35:CLS 

100 VDU5,23,254,112,248,248,248,248,2 
48,248,112 

118 PROCPALETTE 

120 PROCSTART 

138 C$-0 

148 REM Draw broad line until pen is 
stationary. 

150 REPEAT PROCPEN 

160 IF XP%>64 DX$-XP$-XM$ ELSE DX$-0 

170 DY$-YP$-YM$ 

189 IF ABSDX%>6ØØ THEN DX$-0 

190 XM%=XM%+DX%DIV4 

200 YM$-YM$TDY$DIVA 

210 MOVE XM%, YM% 

220 VDU254 

230 IFABSDX$«20 AND ABSDY%<2@ C%=C%+1 
ELSE C3=Ø ` 

240 UNTIL C%>25 

250 GOTO119 

260 REM End of main program. 

265 | 

270 DEF PROCPEN:REM Get pen coordinat 
es in graphics units. 

280 OS%=1542:REM Change value to comp 
ensate for timing errors. 
. 299 T$-(USR(pen) AND&FFFF) -OS$ 

300 XP$-16*(T$ MOD 80) 
YP$-32*(32-T$ DIV 89) 
ENDPROC 


REPEAT TWAS%=TS 
T$-USR(pen) AND &FFFF 
UNTIL T-TWAS&-4-80 
PROCPEN 
XM$-XP$£:YM$-YP$ 
SOUND 1,-15,1590,1 
ENDPROC 
405 
410 DEF PROCPALETTE:REM Draw palette 
and wait for colour choice. 
420 VDU4,23,255,&FCFC; &FCFC; &FCFC; &FC 
FC; 23;8202;0;0;0;28,0,31,0,0 
430 COLOUR135:CLS 
440 FOR T=128 TO 134 
450 COLOUR T 


DEF PROCSTART:REM Wait for pen do 7 
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460 VDU32,255,255, 32 

470 NEXT 

480 *FX15,Ø 

490 REPEAT PROCPEN:K=NOT INKEY (Ø) : UNT 
IL(XP$»16 AND XP%<64) OR K 

500 IF K CLG:GOTO430 

510 SOUND 1,-15,159,1 


520 COL=7-YPSDIV128 


530 GCOLØ, COL 

540 COLOUR COL+128:CLS 
550 T-INKEY (109) 

560 COLOUR]28:CLS 

570 VDU5 

580 ENDPROC 


————————»"Hn————————— IDE 


DISC PROGRAM RELOCATOR - Vol.2 No.2 
. Several members have written to say 
that the "Disc Program Relocator" given 
in BEEBUG Vol.2 No.2 P.31 does not work 
on Issue II Basic because you cannot 
have "ON ERROR DELETE" in Basic II. We 
apologise for this, and are now testing 
all programs on Basics I and II. The 
following routine works on both Basics. 
To use the routine simply add these 
lines to the beginning of the program 
to be moved down and CHAIN the program 
from disc as normal. 


I *KEYØ *TAPE|MDELETE]! , 3] MPORI2-0TO 
TOP-PAGE STEPA4:I$!&E00-I$1&1900: 
NEXT | MPAGE=& EØØ | MEND | MRUN | M 

2 *FX 138,0,128 

3 END 


For further information please refer to 
the article "Disc Program Relocator" 
given in BEEBUG Vol.2 No.2 P.31. 


SOO ee COUT ELT ELEET TERT TITETTTTTL FATE TT TELE EEE 


HEDGEHOG - Vol.2 No.2 

There was a minor problem with the 
listing of 'Hedgehog' in  BEEBUG Vol.2 
No.2 p.38. In line 880 someone had 
stolen the hyphen from PROC HARDER. 
This was lost in our pasting up 
process, but fortunately most members 
realised that it was missing. 

Secondly, there was an error in line 
2460 which takes effect when you reach 
the fifth screen. The barriers in the 
middle overlap and give a ‘String too 
long! error. This is cured by: 

2460 LEVEL%=LEVEL%-2* (LEVEL£«»9) 

In our tests of the program we never 
got further than screen 4. Thanks and 
congratulations to M.Gidley, 
R.Gallimore, and others for getting 
that far, and for bringing this to our 
attention. 
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DISC SECTOR EDITOR - Vol.2 No.3 

Last month's magazine contained an 
article about a  'Disc Sector Editor! 
(Vol.2, No.3, P.27), which could be 
used to retrieve an accidently erased 
program or data file. The sector editor 
works well, but a problem has been 
found to arise if the retrieved program 
was not originally the 'first' one on 
the disc. If the disc is subsequently 
written to (eg. | through SAVE or 
*COMPACT) then the DFS still thinks 
there are spaces on the disc where in 
fact there are not - and a file may get 
overwritten! The solution is simple and 
merely involves performing the 
following operations AFTER retrieving a 
file as described by the article: 


1) *COPY the retrieved file onto 
another disc, 


2) *DELETE the original retrieved file, 


3) *COPY the file created by 1) back 
onto the original disc. 


We have found no problems arising at 
all after performing these few extra 
steps. 


ETE EE EEE EEE ETE EEE 


FAST VERIFY FOR WORDWISE - Vol.2 No.3 

The hint which appeared in last 
month's magazine on page 34 should not 
have the & before the hex value of 
8000. This is because the statement 
*LOAD assumes that the value is in hex. 


Miiller uiii 


WATCHING THE BEEB AT WORK - Vol.2 No.3 

The program printed on page 8 of 
last month's magazine does not work on 
OS 80.1. Our note to this effect became 
detatched from the copy. We hope that 
the absence of any note about which OS 
it was tested on may have made you 
suspicious (in spite of our note on 
page 21) 
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by Alan Wood 


The first thing one usually wants to do after installing a disc 
system, is to transfer all one's programs from cassette onto disc. If 
the programs are written in Basic there is often no problem. 
Sometimes the program doesn't fit because the disc system has reserved 
some of the user RAM for its own use, there are numerous routines to 
shift the program down to &EØØ once it has been loaded. (See "Points 
Arising" for our Program Relocator). So wouldn't it be great to 
transfer all those machine-code programs. This program is a version of 
the excellent "Disc Menu" program which appeared in BEEBUG (Vol.2 
No.1), but which now permits almost all types of ‘awkward’ programs - 
Basic and machine-code - to run successfully on a disc system. 


There are many variations of 
'awkward' programs, the main types are: 
1. Single machine-code programs — these 

won't run because they start at &EØØ 

and the disc system reserves that 
space for its own use. 


2. Programs divided into two or more 
programs - first a Basic part which 
displays the manufacturers 
advertising page, sometimes sets up 
things such as sound envelopes, and 
then *RUNS a machine code main 
program. 


3. Basic programs which use high 
resolution graphics and often leave 
insufficient room when the disc 
system has taken its chunk of RAM, 


This  'MENU' program will handle all 
these types and their variations as 
well as the 'normal' files which will 
run anyway. 


The program will accommodate up to 
19 files and permits selection of any 
program with the press of a single key. 
The procedure ‘move! assembles a 
machine-code routine into the top of 
RAM, out of harm's way, ready to shift 
a program down when necessary. 
Procedure ‘select’ takes the selected 
program and jumps to its own individual 
routine which handles all details of 
loading and running the selected 
program. There is no general purpose 
routine, and in this way almost any 
type of program can be dealt with. 
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There are several methods of copying 
from cassette to disc, some of the 
fundamentals are dealt with in the 
article "Secrets of Program Saving" 
(BEEBUG Vol.1 No.2 P.18). 


The three main types are given below: 


TYPE ONE 
Single machine-code programs (eg. 
SWOOP) . 


To transfer this type, perform the 
following; 


*TAPE select the tape filing system 
*OPT1,2 print the file information 
*LOAD"" 1900 load the program from tape 


As the tape loads you will see a 
message of the form: 

FILENAME @5 0585 FFFF1111 FFFFeeee 
Now note down the file length (denoted 
by 1111) and the execution address 
(denoted by eeee) and continue with: 
*DISC select the disc filing system 
*SAVE"FILENAME" 1900 +1111 790900 

which saves the program on disc. 


Note that the execution address has 
been set to 7000 (in hex), this is 
where the machine-code 'move' routine 
is stored. When the file is *RUN it 
will jump to the 'move' routine which 
will automatically shift the file down 
to &EØØ and then jump to the actual 
execution address noted earlier. 


TYPE TWO 


Two-file programs (eg. MONSTERS, 
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the advertising and to *RUN the main 
machine-code section. 

The Basic section is odd because, if 
you LOAD it then SAVE it, the SAVEd 
version will inexplicably be much 
shorter than the original! (and will 
not run). This is because the graphics 
data is stored in the RAM space 
immediately following the Basic part, 
and is thus not a part of the Basic 
program. 

To copy this type do the following: 


*TAPE 

*OPT1,2 

LOAD"" (NB do not use *LOAD) 

As the tape loads you will see a 


message of the form: 
FILENAME @5 Ø585  FFFF1111 FFFFeeee 
Now note down the file length 
(denoted by 1111) and the execution 
address (denoted by eeee) and continue 
withs 


*DISC 

*SAVE"filename" 19ØØ +1111 
Note the use of *SAVE, this is to 

ensure that the graphics codes are 
saved as well as the Basic. 
LOAD was used so that the program can 
be LISTed. LIST the program and find 
the line which RUNS the main 
machine-code section. This line may not 
be acceptable to the disc system for 
one of the following reasons: 

a) The program name should contain no 
more than seven characters. 

b) The program name must not be the 
same as the Basic section's program 
name, otherwise the disc system will 
be confused. 

c) There may be no program name at all 
(eg. *RUN""), this is not 
acceptable to the disc system and a 
program name must be chosen. 

If changes to this line were necessary 

then re *SAVE it as above. 


BASIC programs are transferred to disc 
in the usual way; 


* TAPE 

*LOAD"" 

*DISC 
*SAVE"filename" 
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Do not attempt to run any programs 
during transfer, and make sure that the 
filename is no more than 7 characters 
long. 


It is now necessary to put 
information about each file into the 
"menu" program and to write the 
individual routines which will enable 


each file to run. Proceed as follows: 


1. Choose a title for the menu and type 
it into the DATA statement at 
line 47Ø. 

2. Starting at line 480 enter data 
about each file to be included. The 
first item is the file name, 
followed by the program name to be 
displayed by the menu, followed by a 
short description of the program. 

3. Starting at line 3ØØ enter a routine 
for each program in turn which will 
set it up and run it. 

of these 


Examples routines are as 


follows: 


a) Machine-code programs - these must 
be shifted down to &E@@ before being 
run. First set the execution address 
(denoted by eeee when taking the 
file off the cassette) as the 
parameter of the procedure "move", 
and finally *RUN the program. 

The routine will look like this: 

300 PROCmove (&18ØØ) : *RUN" SWOOP" 
(Don't omit the & before 
address) . 


the 


b) Two-file programs - as above there 
is a machine code section so the 
execution address must be set up and 
the 'move" routine assembled into 
RAM. Since the first file is in 
BASIC it must be CHAINed. The line 
will look like this: 

590 PROCmove (&3283) : CHAIN" SNAPPER" 


c) BASIC programs - which won't fit 
into memory, will almost always fit 
if PAGE is set to &1100. Since the 
disc system normally only uses &EØØ 
to &11ØØ all that is required is to 
Set PAGE to &11ØØ and CHAIN the 
program. The line will look like 
this: : 

600 PAGE-&1100:CHAIN"SPHINX" 


On some Acornsoft programs the Basic 
d th isplay 


E] 
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the advertiser's screen an 
actual program, in this case the 
complete Basic section can be omitted 
if required and the game itself treated 
aS a Single machine code program. 

Sometimes however there is more to it 
than that, the program will often do 
things like set up sound envelopes, or 


print instructions. If the extra 
instructions are short then they can be 
incorporated into the appropriate 
‘menu’ routine and the Basic file 


deleted as above, otherwise they are 


best left intact. 


4, Modify line 29@ to include the first 
line number of each separate routine 
written, this ensures that after 
selection the appropriate action is 
taken for each file. 


Other programs can be added later up 
a maximum of 19. 
The MENU can be run automatically by 


TTT ARERR RRR RRR e o o s oo o o o0 0 4 0, 5 5*9 0 0 0 o^ 0 o o o e" e" o oe". 
TI QOO ne hee DN I OD 


ae e o « e n e O 8 € 9.9 & 9 9 9 € 09 
KPT ie Oe Oe OI SE EE DE IE NEDE IKE IE IE 26 0600 06 20 00 IPSIS 


1 REM Cassette to Disc Version 1A 
ON ERROR GOTO 560 
READ title$ 
DIM FS (20) ,N$ (20) ,D$ (20) 
13=Ø 
REPEAT 
13=1%+1 
READ FS (1%) ,N$ (1%) ,D$ (I$) 
UNTIL FS(1%)="DONE" 
max£-1$-] 
MODE 7 
PROCcentre (title$) 
FOR J$-] TO max$ 
IF max%<1@ THEN PRINT 
letter$-CHRS$ (64+J%) +" ." 
colourS=CHR$ (129+(J%-1)MOD 6) 
PRINT letter$;colour$;N$(J%) ; TAB( 
14) ;"- ";DS(J$) 
170 NEXT 
180 VDU 28,0,24,39,VPOS 
190 PRINT'"enter the letter of your c 
hoice...."; 
200 REPEAT 
210 A%=GET 
220 PRINT CHRS (A%) 
230 req%=A%-64 
240 IF req%>@ AND req%<=max% THEN PRO 
Cselect 
250 PRINT'"select a letter from A to 
" ;CHR$ (max$464) ;" 2000"; 
260 UNTIL FALSE 
270 END 
280 DEF PROCselect 
290 ON req% GOTO 3ØØ,31Ø,34Ø,35Ø,36Ø, 
370,380 
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pressing y " 

instructions on how to do this are in 
the original 'Disc Menu Program' (Vol.2 
No.1 P.28). 


After all this there are still a 
very few programs which won't transfer 
on to disc without modification to the 
programs themselves. Examples. are 
Philosopher's Quest and EDG Graphics 
system. These programs call machine 
code data into a given area of memory 
WITHOUT corrupting the original Basic 
program, when this is done with a disc 
system the area &EØØ to &1169 is 
corrupted. 

One can only hope that the software 
distributors will do something for disc 
owners, it would be a nice gesture if 
they would offer a ‘trade-in’ allowance 
to those who bought it on cassette only 
to discover too late that it won't run 
on disc, or perhaps publish program 
modifications to do it oneself. 


SE SN EE RR NK AK E IK OK AK NKK RR CR IG IKK IG IIIS IE i PP a 
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"oo o o 27070 o5 0*0 0 0" 0^ 6*6 0 o o e e s e o o e o e o a o e ete te era 0 0 0,010,910 19,9,9,9 9,9 9 0 9 9, DK 6 0 0 0 0 5 0 0 0 19 6 929,9, 


300 PROCmove(&18009) : *RUN" SWOOP” 
310 ENVELOPE1,4,6,-3,-3,4,2,2,0,0,—1, 
0,63,58 
320 ENVELOPE2,3,-4,-1,2,6,6,28,81,-4, 
-5,-1,126,63 
330 PROCmove (&3283) : *RUN" SNAPPER" 
348 PAGE=&11ØØ:CHAIN"SPHINX" 
35@ PROCmove (&EØ2) : CHAIN" DEFEND" 
360 PROCmove (&E@2) :CHAIN"MONSTER" 
370 PAGE-&1100:CHAIN"FROGLET" 
380 PAGE-&1100:CHAIN"DEATHW" 
390 ENDPROC 
400 DEF PROCCcentre (T$) 
410 PRINT' 
420 L%=LEN(TS)/2 
430 FOR Y$-] TO 2 
pe PRINT CHR$141];CHR$134; TAB(20-L$) ; 
T 
459 
460 
470 
480 
ame 
490 DATA SNAPPER,SNAPPER,Chase throug 
h a maze 
500 DATA SPHINX,SPHINX,Adventure game 
510 DATA DEFEND,DEFEND,Space invaders 
game 
520 DATA MONSTER,MONSTER,Chase game 
530 DATA FROGLET,FROGLET,Cross to saf 
ety 
540 DATA DEATHW,DEATHWATCH,Battlefiel 
d shooting 
55@ DATA DONE,DONE,DONE 
56Ø REPORT 


NEXT 

ENDPROC 

DATA GAMES DISC 1 

DATA SWOOP,SWOOP,Space invaders g 
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570 IF ERR<2ØØ PRINT ERL:END 810 LDA (old) ,Y 
580 PRINT" ( ";FS(A$-64);" )" 820 STA (base),Y 
590 X=INKEY (500) 830 INY 

600 RUN 840 BNE LOOP] 
61Ø END 850 INC old+] 
620 REM assemble the 'move' routine 860 INC base+1 
630 REM into the top of RAM. 870 DEX 

640 REM The routine is called by the 880 BNE LOOP] 
658 REM file needing to be moved and 890 .LOLOOP 

660 REM then jumps to the file's 900 LDX length 
670 REM execution address to run it. 910 BEQ FINISH 
680 920 .LOOP2 

690 DEF PROCmove (execute£) 930 LDA (old),Y 
700 base=&7Ø:0ld=&BE:length=&C2 940 STA (base),Y 
710 FORI$-0 TO 2STEP2:P%=&7ØØØ 959 INY 

720 [OPTI$ 96g DEX 

730 LDA Hø 970 BNE LOOP2 
740 STA base 980 .FINISH 

750 LDA H&ØE 990 LDA $&0E 

760 STA base+] 1000 STA &18 

770 LDY HØ 1010 LDX #&FF 

780 LDX length+1 1020 TXS 

790 BEQ LOLOOP 1030 JMP execute%: ]|NEXT 
800 .LOOP] 1948 ENDPROC 


*FX202 - Dr.R.W. Harris 


The *FX2Ø2 call returns the status of the keyboard LEDs and the shift and control 
keys. Used as an OSBYTE call with X=@,Y=255 it returns the following in X: 


keys pressed caps lock on shift lock on neither 


shift - &28 &18 &38 
control &60 &5Ø &70 
shift/control &68 &58 &78 
neither &20 &10 &30 


(For more on FX202 see "FX Call Update" in BEEBUG Vol.2 No.2 P.28) 


000000 070000 Cee o 0ra 0 0 o.o 
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— 
HOW TO "NEW" A RUNNING PROGRAM (New 0.5. ) Tom Standage 


(As demonstrated in BEEBUG Vol.1 No.1 P.16) 
Simply insert the lines: 

1000 *KEYO,NEW|M 

1910 *FX138,0,128 

1020 END 


This will insert the word 'NEW' into the keyboard buffer, followed by a return. Thus 

the program will be erased after it stops running. It is of course still possible to 

OLD the program after this. To make the program un 'oldable' replace line 1020 with: 
1920 !PAGE-0:! (PAGE+4) 20: END. 


So e o o o AG e e o o a o T UU o vw» vvv 


Moe" o" e o e o a a o o a o a o ea LU LOL" 9 9 D» p veo» » os 0€ 


Using option 5 of Wordwise for a selective search is a very fast way of finding an 


occurrence of a word. Pressing Escape when it prompts for the replacement will leave 
the cursor on the word. — 
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by Sheridan Williams 


This is the last part in our series on using files. To conclude I will discuss 
two topics which will be of interest to those who want to use files with more 
complex design - Addressing Algorithms, and Index Sequential files. 


This article is necessarily complicated and should be read in conjunction with 
Files Part 4' as the topic of 'Direct Access Files' was discussed there. 


ADDRESSING ALGORITHMS 


Because random access files require 
fixed length records, we need to have a 
method for finding the start address 
for each record. Calculating this start 
address is done by using the key field. 
The key field is the field that 
uniquely defines a record, it must be 
different for every record, so that 
there is no ambiguity. 


The key field should lend itself to 
address calculation, for example: Part 
number 16051, Clock number 117, Credit 
card number 0704552345. 


For example in a stock file where the 
record length is 59 characters, then: 


Therefore part number 16051 would start 
at address 5Ø*(1Ø51-1)+1 = 5259] 


However, part numbers might consist of 
four digits starting at 19000 and by 
using the above algorithm 999 records 
would be wasted. A better algorithm in 
this case would be 5Øø*(p-1ØØØ)+1. 
Matters become more complicated if part 
numbers are not continuous, they might 
exist only in the following ranges: 
1889-1999 and 3ØØØ-6999. In this case a 
suitable addressing algorithm would 
be:- 
50* ((p-1ØØØ) + (p»1999) *1009) ) 

(See the article "Logic Part 2" BEEBUG 
Vol.] No.6 for an explanation of logic 
within arithmetic statements). 
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It is also possible to calculate a 
start address for a record with a 
non-numeric key. Let us assume that the 
key field is alphabetic. 

We can calculate an address based on 
the numeric equivalent of the letters. 
For example assuming that. the record 
length is 2@ characters the following 
will apply: 


where. 

DEF FNa(x)=ASC (MIDS (key$,x,1) )-65 
You will notice that the key ZZZ would 
require an address of over 350,000 
which exceeds the capacity of one side 
of a normal (current) floppy disc 
drive. 


Index sequential access is the 
process of storing or retrieving data 
directly, but only after reading an 
index to locate the address of that 
item. 


Index sequential files 

Solution to two problems:- 

1. There is no need for a record to be 
of fixed length. 

2. The record key can consist of any 
characters. 


provide a 


Briefly, each file actually consists 
of TWO files - the MAIN file and the 
INDEX file. I would recommend that the 
"index" file should have the same name 


as the "main" file but should have a 
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example if we wish to have a file 
called STOCKS and process it as an 
index sequential file, then the main 
file should be called STOCKS and its 
associated index file called I.STOCKS. 


In order to access (read or write) 
any record, the index is consulted 
first. The index file has the briefest 
possible record structure, which simply 
contains the key and the address of the 
corresponding record on the master 
file. 


DEMONSTRATION PROGRAM 


This program demonstrates the action 
of an Index Sequential file. The main 
file is called DEMO, and its index is 
called | I.DEMO. Four routines are 
implemented - write a record, read a 
record, list the records, and end. Many 
other routines could be implemented, 
for example deletion of records, list 
specific records, printer on/off etc. 


To use the program, first make sure 
that there are no files on the disc 
called DEMO and I.DEMO. Also make sure 
that there is room on the disc for two 
more files. Type RUN and select choice 
number 1 - "write a record". You will 
be asked for a "key", try entering 
ABC123V, then you will be asked for a 
record description, try entering: Ford 
Escort XR3i. This will then be written 
to the file and then the menu will 
re-appear. 


Before you put on any more records 
you should try each of the other 
options to check if you have typed the 
program correctly (you should have no 
problem if you have read it from the 
magazine cassette). If all goes well 
you can enter lots more records, 


together with their keys, and retrieve 
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catalogue starting with "I"; for 


IMPORTANT NOTE FOR USERS WITH BASIC II 


If you have Basic II you will have 
to replace the OPENIN with OPENUP in 
both lines 20 and 60. If you have 
loaded the program from the "magazine 
cassette" then you will have no 
problem, because if you have Basic II 
the word OPENIN will be converted 
automatically to OPENUP. See the "Hint 
and Tip" elsewhere in this issue for 
further details. 

This note also applies to the program 
given in last month's "Using Files - 
Part 4" article. Change the OPENIN to 
OPENUP in the first demonstration 
program given on page 21 line 20, and 
in the program on page 22 line 39. 

[To discover whether you have Basic I 
or Basic II, switch on the machine from 
cold, now type REPORT. If the date in 
the message is 1981 then you have 
Basic I, if it is 1982 then you have 
Basic II. For further details on 
"Issue II Basic" see BEEBUG Vol.] No.6 
P.11 Item 7.] 


5 REM VERSION JA 
10 ON ERROR GOTO 7090 
20 cl=OPENIN" DEMO" :IF cl<>@ THEN 60 
30 
C1-0PENOUT" DEMO" :c2=OPENOUT" I . DEMO" 
40 nia%=11s:nma%=1|:PTRic2=1: 
PRINT#c2 ,nia% ,nma% 
50 CLOSE#@:GOTO 2Ø 
68 c2=OPENIN"I.DEMO" 
80 REPEAT:CLS 
og PRINT TAB (7) ;CHR$13Ø: "INDEX 
SEQUENTIAL FILE DEMO" 
100 PRINT'''"1, Write a record" 
118 PRINT"2, Read a record" 
120 PRINT"3, List of records" 
125 PRINT"A4, End" 
130 PRINT'"Choice? ";:choiceS-GETS 
148 PRINT choice$ 
158 IF choice$="1" PROCwrite 
16Ø IF choice$="2" PROCread 
17Ø IF choice$="3" PROClist 
18Ø IF choice$="4" CLOSE#@:END 
19Ø UNTIL FALSE 
999 : 
1000 DEF PROCwrite 
1920  INPUT"Record key ",key$ 
1030  INPUT"Record description ",desc$ 
1935  PROCread header 
1040 PTR#c2=nia%:PRINT#c2,key$ ,nma% 
1950 PTRicl=nma%: PRINT#c] ,desc$ 
1960 nmat=nma$+LEN(desc$) +2 
1970 nia%=nia%+LEN(key$) +7 
PTRiC2=1 : PRINT#c2 ,nia%,nmag 
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DPROC 
1999 : | 
2000 DEF PROCread:LOCAL k$ 
2020 INPUT"Key ",k$ 
2025 PROCread header:IF NOT exist 

PROCready : ENDPROC 
2030 REPEAT 
2040 INPUT#C2,keyS$ ,nma% 

2050 UNTIL EOF#c2 OR k$-keyS$ 

2060 IF k$<>key$ PRINT"Key not found 
on file.":PROCready:ENDPROC 

2070 PTR#cl=nma%: INPUT#c] ,desc$ 

2080  PRINT"Key = ";keyS$ 

2090  PRINT"Description = ";desc$ 

2100  PROCready:ENDPROC 

2999 : 

AQOQ DEF PROClist 

491@  PROCread header:IF NOT exist 

PROCr eady : ENDPROC 
4916 REPEAT 
4020 INPUT4c2,key$,nma$ 
4030 PTRic12nma? : INPUT#c1 ,desc$ 
4040 PRINT"Key = ";key$ 
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PRINT" Description: 
4060 UNTIL EOF#c2 
4070 PROCready: ENDPROC 
4999 : 

5000 DEF PROCready 

5010 PRINT"Press ‘space’ to return to 
menu "; 

5020 REPEAT UNTIL GET=32 

5030 ENDPROC 

5999 : 

6000 DEF PROCread header 

6010  PTRÉC2-2]:INPUT£4C2,nia$,nma$ 

6020 exist=(nia%>11) 

6030  ENDPROC 

6999 : 

7000 IF ERR=157 CLOSE#@:RUN:REM File 
left unclosed 

7010 IF ERR<>17 PRINT: REPORT: PRINT" 
at line ";ERL: END 

7020 IF ERL-130 PRINT’ 'CHR$129;"You 

must end using option 4" :q=INKEY (209) 
7030 GOTO 89 


"sdesc$' 
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Dy 
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Have 


LEEN CHARACTERS (1 
by Tim Powys-Lybbe 


you ever wanted to display really BIG Letters on the mode 7 screen. Well, this 


6/32k) 


program does it, in fact it prints blown up mode 0 to 6 characters onto a Teletext 


mode 7 screen, 


This is possible as the structure of these characters can be found 
through the Operating System call OSWORD with A=10; line 310 does this. 


Line 330 


then deciphers the pixels and prints them as big graphics blobs on the screen. 


The program uses the Teletext 


colours, and a separate colour can be 
specified for each of the three Lines 
on the screen. In addition, a rainbow 
effect can be specified for any or all 
Lines, this gives a different colour 
for each mode 7 Line on the screen. At 
the end of the program these colours 
will continually change to give a 
striking display, you exit this by 
holding down the space bar. The 
program was designed to give a large 
scale, attractive display. 


Obviously the program can be 
modified to suit different purposes. 
For instance one could give a 
continuous series of screens each with 
a different message by READing from 
DATA into the screen display holding 
array, D4(2,14) and into K% and R%(2). 
The easy way to do this is to read the 
data into PROCLineInput and into 
PROCColourInput instead of using 
FNLineln for keyboard entry. K% needs 
to be given the number of characters on 
each screen less one. 


tmt tem meme mme n a a nA A A n A n ^ A 2 t a e ee n a a & & a 2 A e a a c c a a a a a a a a ade 


10 REM BIG characters Version 1A 

20 MODE7 

30 DIMD$(2,14),R$(2):B-32:REM D$ hol 
ds the characters for the display; R$ h 
olds the colours for the display. 
49 PROCBigLetters 
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BØ MODE? : END 

60 

70 DEF PROCBigLetters 

80 VDU26,12,14 

90 PRINT" You can display a maximu 
m of three"'"lines of five characters e 
ach on the"'"screen,"' 

100 PRINT" The characters on each 1 
ine will be"'"centralised on that line. 

However"'"spaces can be included to f 
orce the"'"position on any line."' 

118 PRINT" The colour codes are;"'" 
I Red"; TAB(13)"4 Blue"; TAB(26)"7 White" 
'"2 Green"; TAB(13) "5 Magenta"; TAB (26) "8 

Rainbow"'"3 Yellow"; TAB(13)"6 Cyan"''" 
Enter your characters now:" 

120 REPEATK$-0:FORI$-0TO2:PRINTTAB (Ø, 
17+1$*2) "Line ";I$41;SPC8;TAB(9,17-I2*2 
) ; s PROCLine Input : PRINTTAB (19, 17+1%*2) "C 
olour "; TAB(27,17+1%*2) ; s PROCCOlour I 
nput : NEXT 

130 PRINTTAB(Ø,24)" Are your entrie 
S OK? (y/n) ";TAB(3Ø,24) ; : PROCYesNo: UN 
TILAS="y" 

140 PROCBigDisplay:ENDPROC 

158 

160 DEF PROCLineInput 

178 AS=FNLineIn 

18Ø IFAS="" ENDPROC 

198 FORJ3=ØTOLEN (AS) —1:D$ (Ø, K3) =ASC (M 
IDS (AS ,J%+1,1) ) :D$ (1, R2) =2Ø-4*LEN (AS) +J 
$*8:D9$(2,K$)-I$*8:K$-K2--]:NEXT 

200 ENDPROC 

212 

220 DEF FNLineIn 

230 x-POS:y-VPOS:PRINTTAB (x,y) SPC8; TA 
B(x,y); 

249 BS="" :REPEATAS=GETS : IFASC (A$) >31 
ANDASC (AS) <127 ANDLEN (BS) <5 BS=BS+AS : PR 
INTTAB (x+LEN (B$) -1 , y) AS; 

250 IFAS=CHRS (127) ANDLEN (BS) >1 B$=LE 
PTS (BS, LEN (B$) -1) : PRINTTAB (x,y) BS; " ";T 
AB (X+LEN (BS) ,y) ; ELSEIFAS=CHRS (127) ANDL 
EN (B$)=1 B$="":PRINTTAB (x,y) " "STAB(X,y 

260 UNTILAS=CHRS (13) 

270 VDU31,x,y:=B$ 

280 

290 DEF PROCBigDisplay 

300 IFK$-0:PROCBigLetters ELSECLS:C=Ø 
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310 A3=1Ø:X3=&7Ø: YS=Ø:?X3=D% (Ø, L%) :CA 


LL&FFF] 

320 FORM$-TO7:FORN$-7TOOSTEP-] 

330 IF(?(&714M$)AND2^N$)-2^N$ VDU31,D 
$ (1,L$) -7-N$,D$ (2, LS) -HM$, 255 

348 NEXT:NEXT:NEXT 

350 PRINTTAB(@,24)"Do you want anothe 
r screen? (y/n) ";:PROCYesNo:IFAS-"Y" R 
UN ELSEPRINTTAB (Ø, 24) STRINGS (38," ");:V 
DU23: 8202; Ø; Ø: 0; :C=2Ø: REPEATPROCColours 
: UNTILB=32 3 ENDPROC 

360 

370 DEF PROCColourInput 


388 REPEAT:R$ (I%) ( 
R$ (I$) >ØANDR% (I$) «9: ENDPROC 

390 

400 DEF PROCColours 

410 FORI%=0TO2:FORJ%=@TO7 : IFRS (I%) =8 
B=INKEY (C) : VDU31 ,@, 13*8+J3%,144+RND(7) E 
LSEIFC=Ø VDU31,Ø,1%*8+J%,144+R% (I2) 

420 NEXT:NEXT:ENDPROC 

430 

440 DEF PROCYesNo : REPEATAS=CHRS (GETAN 
D&DF) : UNTILINSTR("YN" ,AS) >Ø: PRINTAS ; : EN 
DPROC i 
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Rob Pickering chooses two Eprom programmers to review, and compares their 
facilities and features. 


During the course of 1983 we will increasingly be seeing software available in 
EPROMs and ROMs, as the basic production costs fall and the general awareness 
increases. An EPROM programmer is an essential device for anyone wishing to put 
their own software into EPROM, so we have taken a Look at the current state of the 
market. Two companies have kindly supplied machines for review. No background 
information on EPROMs or ROMs is given, though you may Like to refer to page 16 of 
the March 1983 Hobby Electronics magazine which explains the technology quite 
clearly. 


The market for EPROM programmers can be identified mainly as: small businesses, 
education, an increasing number of hobbyists, and software Pirates! The ease with 
which EPROMs can be copied illegally is rather disconcerting, since it will 
potentially lead to less professional software being produced. 


Vacant sockets inside the machine, situated adjacent to the Operating System, are 
generally referred to as the paged ROM (or sideways ROM) sockets. However it is 
possible to put a variety of things into EPROMs in these sockets. Basic programs, 
data files etc. can all be stored, then used by typing *ROM. After an *ROM command 
subsequent ‘read’ operations such as LOAD"" will read from the Language ROM sockets, 
instead of the cassette or discs. (The *ROM command is only available on the 
series 1 OS). 


E 
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REVIEW MACHINE from ATPL 


SUPPLIED BY: ATPL, Station Road, Clowne, Chesterfield. S43 4AB. 
PRICE: £120 +VAT, inc.P&P 

INCLUDES: Software cassette, all connectors, manual. 

EPROM SIZES USABLE: 4,8,16k bytes (note: kbytes, not kbits) 


The ATPL unit is very well presented indeed. With a well written, well printed A5 
manual (27 pages); a cassette wallet containing one cassette with all required 
software; ind the device itself ready to plug in. It connects to both the 1MHz Bus 
via a 34-way Gen connector on ribbon cable, and to the power output socket on 
the Beeb (make sure your's has one fitted). 


The software used to control the programmer is on the cassette and must first be 
loaded and executed. The programming relaved functions are: Blow, Read, Verify, 
Clear. ‘Blow’ programs an EPROM from RAM contents; Read reads an EPROM's contents 
into RAM; Verify checks that the EPROM has programmed correctly; Clear checks that 
the EPROM is blank. The Blow command automatically carries out a clear’ check 
before programming, just in case you've accidentally inserted an EPROM which is 


already programmed. I would have overwritten several EPROMs were it not for this 
safety check. 


I was very impressed with the software when I first received it, and remain 
impressed after using it a great deal. The software is written entirely in machine 
code and a full assembly Listing (the source code) is provided both as a 5 page 
Listing in the manual, and also on cassette. The fact that it is on cassette means 
that it can be loaded and re-assembled at a new location. I had to re-assemble it at 
81900 in order to use it from discs, for which the instructions are given in the 
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manual. It could of course be located at the top end of memory. The software rates 
highly on ease of use, with commands to do just what you need. In addition to the 
four main commands, operating system commands starting with an asterisk are 
recognised and carried out. Thus, data to be programmed into the EPROM can be Loaded 


form disc or cassette with *LOAD giving the RAM Location at which it is to be 
Loaded. 


ALL that has been mentioned so far is the programming capability, but the ATPL 
device has another side to it as well. Any Basic or machine code program may be 
programmed into one or two EPROMs (a maximum Length between 4-32k Long) and then 
placed into either or both of the two special sockets underneath the unit. This 
program may then be Loaded and automatically executed merely by pressing BREAK. It 
only takes a second or two for the program to Load and execute, so speed is 
comparable to discs. Four switches are provided on the top of the enamelled metal 
case which are set accordingly for OS 0.1 or series 1, Basic program, machine code 
program, or no program at all. Nothing else needs be done. With the switches set and 
the device plugged in, switching on the power to the BBC micro will result in the 
program being loaded and executed in an instant. In order to achieve this "auto run' 
facility, it is necessary to take a machine code routine supplied on the cassette 
and program it into an EPROM. This caused me some initial delay because I didn't 
know I needed the blank EPROM. However, ATPL do state this on their order form and 
in their data sheets and can supply a suitable device. It is worth noting this, 
though if you order straight from a magazine and without seeing an order form, 
remember that you need a 2732 EPROM. 


DRAWBACKS: Only one program may be in the device for auto-run at any one time. 
The use of the power supply socket, used by many types of disc drive, cannot be used 
for both programmer and discs at the same time. ATPL rightly point out that not 
many people will want to use both. The connecting cables on the unit are very short 
and make it difficult to position conveniently for use. It can only sit very close 
in front or to the right of the machine. The most obvious disadvantage is the cost, 


at about £138 inclusive, it is beyond the reach of most ‘hobbyists’ who are merely 
interested. 
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REVIEW MACHINE from MED 


SUPPLIED BY: MED, 640 Melton Rd., Thurmaston, Leicester, LEA 8BB. 

PRICE: £79.90 fully inclusive. 

INCLUDES: Software cassette, all connectors except mains plug, instructions. 
EPROM SIZES USABLE: 2,4k bytes only. 


The MED unit itself is well made, but falls short of the ATPL unit in many ways, 
though it must be pointed out right at the start that it is much cheaper too. The 
documentation is poorly presented as A4 copies of dot-matrix printer output. 


However, the content is good enough to help an experienced user to cope with the 
software. 


The programming software is not at all as easy to use, requiring a Lot more 
thought and understanding. However, its relative complexity includes the possibility 


of reading or writing any specified part of the EPROM, whereas the ATPL unit deals 
only in terms of the entire EPROM at once. 


Because there is only a capability to program 2k and 4k  EPROMs, its use for 
programming EPROMs for the BBC micro is somewhat Limited, though for other 
microelectronics applications such as in older computers like UK101, PET, etc. it 
is perfectly adequate. The future of programming EPROMs for the BBC micro is Likely 
to be with 8k and even 16k devices. However, MED have informed me that they are 
going to produce an add-on to cope with 8k EPROMs and possibly 16k eproms. 
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Since there is no auto-run facility at all on this unit, it is not possible to 
immediately use an EPROM which you have programmed for the BBC micro. Although MED 
have successfully placed a 4k EPROM in one of the internal ROM sockets, it was 
necessary to use an extra machine code routine in order to transfer the EPROMs 
contents into RAM. ALL in all a rather untidy and experimental method at present. 


CONCLUSIONS: The two machines are not really aimed at quite the same people as far 
as I can tell. The ATPL unit is useful to those wanting to program EPROMs quickly 
and easily, and/or to use them for the BBC micro. The MED unit seems more of an 
investigatory and development device, but for producing EPROMs for use with other 
machines... for which it is very good. Finally, the difference in size of EPROM 
which can be programmed is a major difference between the two, but bear in mind the 
followings although costs are falling rapidly, a 16k eprom still retails at about 
still retails at 4 to 5 times the price of an 8k EPROM. ems] 


FUNCTIONS AND PROCEDURES - Bjorn Grand 


It is possible to use functions and procedures from 'immediate mode', provided that 
the function or procedure definition is in the current program in memory e.g. 

18 DEFFNFAK(N%) for example, typing 

20 IF N3=Ø THEN-]1 PRINT FNFAK(3) gives 

30 =N%*FNFAK(N%-1) an answer of 6. 


This allows procedures and functions to be written and tested before the rest of the 
program is written. Thus you can use BBC Basic a little like Forth, writing the 
small routines first, followed by their linking together. This should be useful to 
the structured programming freaks. 
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OSFIND - Bjorn Grand, Matthew Rapier 


According to both the BBC User guide, and the Disc System User Guide, OSFIND returns 
the file handle in Y. In fact it returns the file handle in A! 


Another bug in the manual is the swapping of much information in the technical 
section of the Disc Sytem User Guide. The various addresses stored in the catalogue 
(sector 01) are in fact stored low order bits followed by middle order bits. 
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PROGRAM TRANSFER BETWEEN BBC AND 3807 (New 0S) - P.J.Andrews 


With the new operating system it is extremely easy to tranfer data between these two 
computers down the serial port. To do this, first set both input and output baud 
rates on both machines to the same value, *FX7 and *FX8 on the BBC. 


To send data to the 389Z, treat the serial link-up exactly as you would a printer 
from the BBC. CP/M requires a Ctrl-Z character as the terminator of the file. Use 
VDU 1,26,3 to send this. The file can be read by PIP or TXED at the 38027 end. 


To transfer programs back again, use *FX2,1 on the BBC to accept data from the RS423 
as keyboard input. Data can be sent by PIP, or TXED (or LLIST in 38ØZ Basic). Entry 
can be terminated by pressing BREAK on the BBC, followed by OLD. It should be 
possible for the 3807 to send *FX2,0 or something similar to end the BBC's 


reception. [This hint will only make sense to users of  CP/M and/or the Research 
Machines 38ØZ computer.] 
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Last month we gave notes on two undocumented commands *CODE and *LINE available 


on OS 1.2. Here we explain how to use them in a little more detail. 


If you have ever tried to 
disassemble the 1.2 Operating System 
ROM, you will probably have come 


across the OS command table. This is 
located at &DF14 onwards and contains 
a list of 'star commands! which are 
recognised by the operating system 
itself, such as *CAT and *H. 

You may also have noticed that there 
are two undocumented commands present, 
*LINE and *CODE: but what do they do? 
If you type them in directly they 


always produce a "Bad Command’ 
message, as if the operating system 
does not recognise them. The reason 
for this is that *LINE and *CODE 
require the setting up of an 
‘indirection vector’ before they can 
be used. 


An indirection vector consists of 
two consecutive bytes of RAM which 
contain the entry address of a machine 
code routine. For instance, when a 
character is to be printed to the 
screen, the OS routine OSWRCH must be 
called: the address of this routine in 
the 1.2 ROM is &EØA4. But rather than 
jump DIRECTLY to this address, an 
INDIRECT jump is performed to the 
address which is stored in the OSWRCH 
indirection vector. 


One of the advantages of this 
method of accessing routines is that 
by changing the contents of the 
vector, the user can intercept any 
call to that routine and force the 
computer to execute his own code (see 
User Guide P.457). A table can be 
found on P.425 of the User Guide which 
lists the major operating system 
routines and their respective vectors. 


One of the vectors, USERV, is free 
for the programmer's use, and is used 
by *LINE and *CODE. This explains why 


these commands always seem to invoke 
the 'Bad Command' message - rather 
than allowing the vector to ‘flap 


around’, 
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address, it is 'tied down’ to &E31Ø 
whenever a Reset occurs. As this is 
the address where the ‘Bad Command’ 


message is stored, *LINE and *CODE 
will always invoke this error until 
USERV is set up. 
The two commands can be described 
thus: 


*CODE X,Y (Where X and Y are 
between Ø and 255) 


integers 


On executing this command, the 
specified values X and Y are loaded 
into the X and Y registers 
respectively, and the accumulator is 
loaded with zero. An indirect jump is 
then performed to the address pointed 
to by USERV: the user's routine should 
be located at this address. Thus: 
?USERV=&EA: ? (USERV+1) =&4Ø:*CODE 214,56 
would be equivalent to: 

X%=214 : Y%=56 3: A$-0 : CALL &40EA 


*LINE s (Where s is a string of 
characters - NOT enclosed by 
quotation marks) 


On executing this command, the 
address of the first character of the 
string is loaded into the X and Y 
registers (X:lo byte, Y:hi byte), and 
the accumulator is loaded with 1. 


Thus *CODE and *LINE call a user 
supplied routine whose address has 
previously been deposited in USERV. 
*CODE allows the user to specify the 
contents of the X and Y registers on 
entry, and *LINE allows the routine to 
access a data string. 


A couple of examples may help to 
clarify their usage. Listing 1 shows 
an application of *LINE to insert 
characters into the keyboard buffer: 
line 368 is particularly important as 
it demonstrates that Basic commands 
such as LIST and NEW which could not 
normally be used in a program, can be 
executed when the program ends. 
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Listing 2 demonstrates that a 


routine can handle both *LINE and 
*CODE commands. This is because *CODE 
loads the accumulator with Ø, while 
*LINE loads it with 1. Thus lines 169 
and 170 check to see if the 
accumulator contains zero: if it does 
then the routine continues with the 
*CODE handling part, otherwise it 
branches to the *LINE handling part. 


On | encountering a * CODE 
instruction, the routine positions the 
cursor at X,Y (i.e. the two *CODE 
parameters) ; and on a  *LINE 


instuction, the string 's' is written 


lø REM ....Listing 1.... 
20 REM 

30 REM *LINE DEMO PROGRAM 
40 REM by C Browell v1A 


60 DIM aSsem address$ 35 
70 userv$-&200 
80 osbyte%=&FFF4 


100 ?userv%=assem address% MOD 256 
119 userv$?]l-assem address% DIV 256 


130 FOR PASS=Ø TO 2 STEP 2 
140 P%=assem address$ 
150 [OPT PASS 
160 STX&7Ø 

170 STY&7l 

180 LDX4Ø 

190 STX&72 

200 .loop 

210 LDY&72 

220 LDA(&70),Y 
230 INY 

240 STY&72 

250 TAY 

260 LDA#&8A 

270 CPY#13 

280 BEQlastbyte 
290 JSR osbyte$ 
300 JMPloop 

310 .lastbyte 
320 JMP osbyte$ 
330 ]NEXT 


350 *LINE MODE6:VDU19,Ø,4:Ø;14 
360 *LINE LIST 


"e" e e a 9, 9,9, 9,9. 


20 REM 
30 REM *CODE/*LINE DEMO PROGRAM 
40 REM by C Browell vlA 
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to the screen. Thus *CODE performs 
an X,Y function, and *LINE performs a 
simple string printing function. 


Try adding teletext contol codes to 
the strings, and then RUN the program 
again. The Basic interpreter will 
consider the codes to be keyword 
tokens, and therefore any codes you 
insert will list as Basic keywords: 
for instance "Alpha Red’ (=&81) will 
list as 'DIV', but the single byte &81 
is still present in memory, so when 
the program is run again the 'Alpha 
Red' character is still printed. 


68 DIM assem address$ 100 
70 userv&-&200 
80 oswrch%=&FFEE 


1809 ?userv$-assem address$ MOD 256 
118 userv$?]l-assem address% DIV 256 


130 FOR PASS=Ø TO 2 STEP 2 
140 P%=assem address% 
150 [OPT PASS 

160 CMPHØ 

17@ BNE star line 
18@ LDA#31 

190 JSR oswrch% 

200 TXA 

210 JSR oswrch% 

220 TYA 

230 JSR oswrch% 

248 .end command 
250 RTS 

260 .star line 

270 STX&7Ø 

280 STY&7] 

290 LDY#2 

300 .loop 

310 LDA(&7Ø) ,Y 

320 CMP#13 

33Ø BEQ end command 
340 INY 

350 JSR oswrch$ 

360 JMP loop 

370 ]NEXT 

380 MODE7 


400 *CODE 9,8 

410 *LINE "COMMAND LINE 
420 *CODE 14,11 

430 *LINE INTERPRETER" 
440 *CODE 19,14 

450 *LINE RULES, OK! 1 
460 *CODE 0,23 
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on OS TT an [ARS LANDER (16k) 
E^ å Basics by Alan Webster 
Mars Lander is a version of the the game too easy (in excess of 800 

popular moon lander game in which the points) you might like to change the 
player attempts to navigate his space gravity factor by altering line 160 to: 
craft through a mass of meteors to land P 

it softly on the landing pad. You 160 SER 
control the horizontal and vertical /\0))): B 

Hy E ne ha eee There is also a 32k version of Mars 
colour and sound. 3 Lander on the magazine cassette. This 


runs in mode 2 and uses more colours 
(and even has flashing stars!) 

The alteration to make this version 
harder is: 370 N%=N%- Gs 95-(1/(Y%/1Ø) )) 


The player can choose the level of 
difficulty for the game - the more 
difficult the game the more sensitive 
the controls. The roughness of the 
terrain can also be chosen, ranging 


from quite smooth to very rough. You The picture that accompanies this 

have 15 seconds to land the craft program is of the 32k version, but of 

before your fuel runs out. course, we cannot show the stars 
The controls are given in the flashing! 


program, and for those of you who find 


SS SSS IS eto ote ot NG o ata Ta 202000 II orooro e rororo RR Onr nOn t I n ON IS «as a e n a Aa ^ M * A ^ 


10 REM Mars Lander Version 1A 109 "TIME-Ó : REPEAT: OXS-X8 : OYS=Y% 
20 ON ERROR GOTO 569 118 IFINKEY-98 IF X%>32 M$-M$-G$ 
30 PROCchars:PROCarrays :MODE 4 120 IFINKEY-67 IF X%<121Ø M%=M%+G% 
4Ø PRINTTAB(14,2) "Mars Lander" ;TAB (1 13Ø X$-X$t(M$/2) : IFX%<32 X$-32 
2,3) "by Alan Webster" 148 IFX%>121Ø X%=121Ø 
50 PRINTTAB(5,1Ø) "Difficulty (1=Easy 150 M$%=M%+ (SGN (M%) /1Ø) : IFINKEY-74 N$- 
,O=Hard) " :G%=GET: IFG3<49 OR G%>56 GOTO N$4G$ i 
5Ø 169 N%=N%-(G%/1Ø) : IFNY>8Ø N%=8Ø 
60 G$-G$-47:dead-FALSE:SC2-0 170 Y$-Y$-8-N$:1FOX$-X$ IF OY$-Y$ GOT 
70 PRINTTAB(5,12)"Terrain (1=Smooth, O 198 
8=Rough) " :L%=GET: IF L%<49 OR L%>56 GOTO 18Ø MOVEOX%, OY% :GCOL@ , 0: VDU224:MOVEX% 
7Ø r Y%$:GCOLØ, 3: VDU224 
80 L$=L%-—48:L%=L%*6:PRINTTAB(13,19)" 198 R%=POINT (X%+55, Y$-31) : R1 $-POINT (X 
Z — Left";TAB(13,20)"X - Right";TAB(8,2 $,Y$-31):SOUND0,-10,4,1:IFR$-] dead=TRUE 
1) "RETURN - Thrust";TAB(9,23) "Press any 200 IFR1%=1 dead=TRUE 
key" : i=GET 21Ø IFR$-2 IFR1%=2 landed=TRUE 
90 MODE5:A2$-100: VDU5: REPEAT: CLS : PRO 220 IF TIME>15ØØ dead=TRUE 
Cmeteors :X%=RND (900) : Y$-1000:M2$-0:N$-1: 230 UNTIL landed OR dead: IFN%<1 dead= 


landed=FALSE: PROCscene TRUE 
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240 G3=G%+1:IF dead GOTO26Ø 

250 SC%=SC%+ (1 5ØØ-TIME) : FORSOS=1TO1Ø 
: SOUND] ,-1Ø, 2ØØ, 1: SOUND1,-10,100, ] : NEXT 

260 L$-L2-4:UNTIL dead:SC%=SC%-1ØØ:PR 
OCexpl : FORY=1TO3ØØØ:NEXT:*FX15 

270 MODE7:PRINTTAB(5,19)" Score was : 
" : SC$ : FORY=1 TO5ØØØ : NEXT : RUN 

280 DEFPROCscene 

290 P$S-RND(129)*8:FORA1$-0TOl280STEP8 
:IFA1%=P% S%=A2% 

3ØØ IFA1>P% IFAI$«(P$4120) PROCpad:G 
0T033Ø i 

310 GCOL@, 1:MOVEA1%, 0: DRAWA19 ,A2$ :A2$; 
=A2%+ (RND (L2) - (L$/2) ) : IFA22«20A22$—20 

320 IFA2$>4ØØA2%=4ØØ 

330 NEXT 

340 ENDPROC 

350 DEFPROCpad 

360 GCOL@, 2: PLOT69,A1%,S%:PLOT69,A1%, 
S%+4:GCOLG, 1 MOVEA1% , Ø: DRAWA1%,S%—4:GCO 
LØ, Ø:MOVEA1% , 59+8 : DRAWA1%,5%+72 

378 ENDPROC 

380 DEFPROCchars 

390 VDU23,224,0,24,60,255,102,60,66,1 
29,23,225,20,126,124,126,254,124,28,48 

400 ENDPROC 

410 DEFPROCarrays 


420 ENVELOPE 1,3,0,0,0,0,255,0,127,0, 
Ø,-127,126,126 
430 DIMZ%(16) ,Z2%(16) ,0%(16) ,01%(16) 
440 FOR Z1$-1TO16:0$ (Z1%) =RND (12) : IFO 
3(Z1%)>6 0$(212)202 (Z1$)-13 
450 Q1%(Z1%)=RND(12) s IFQ1%$(Z1%)>6 01% 
(Z1%)=01%(Z1%)-13 
46Ø NEXT 
470 ENDPROC 
480 DEFPROCexpl 
490 GCOLØ,Ø:MOVEX%, Y% : VDU224: FOR Z6%= 
1TO16:Z22 (Z6$) =X%:Z2% (Z6%)=Y%: NEXT 
500 FORP%=1TO] 4: FORJ%=1T0O16:GCOL@,8:P 
LOT69,Z$ (IZ) ,Z2$ (J$) :Z$ (JS) =Z% (IS) + (0% ( 
J$) *4) | 
518 GCOLØ, 1:22% (7$) =Z2% (J%)+(Q01% (JS) * 
2) «GCOLØ, 7: PLOT69,Z% (J$) ,Z2% (J$) sNEXT:S - 
OUND Ø,1,6,5:NEXTP% 
520 ENDPROC 
530 DEFPROCmeteors 
540 GCOLØ, 1: FORW%=1TO(L%/2.5)+RND(5) : 
MOVE RND(1ØØØ) , RND (6ØØ) -200: VDU225: NEXT 
55@ ENDPROC 
560 ONERROROFF 
570 MODE7:IF ERR=17 END 
580 REPORT:PRINT " at line ";ERL 


590 END E 


Daniel Cooke 


HEAD DEMAGNETISING - 


While a tape recorder is being used, the heads of the recorder slowly become 
magnetised. When the magnetic field builds up it has the effect of wiping all your 
tapes for you! A head demagnetiser can be used to remove this destructive field. 
Proprietary head demagnetisers cost a few pounds, but are well worth the expense. 
Just consider the value of all your programs. It is of course a good idea to keep 
back-up copies of your tape programs, most people only bother taking back up copies 
of discs. It is equally relevant with tapes. = 


RRR 3*3 uS eheu to a ea e ea Puta ato e ote Tete etu T eoe e Te ae o a Ta e oT eT e a eT e o a Ta" o e e a Te e Te ToTaTa To To Te e e eT o e e ToToTa To T eT ao e e" «Ta "n "a "o "o o "a e a" e" a" e" e" a a aa e" ao" RRE e o e o e e e o" e a a" o a aT To" 
*555*0 o5 o o v e o Sa o o o ae e uo o e e e o e e e a ute 95906 6 5*4 4 4*6 2*0 o 0 o 5*0 5 5*0 e 9 o 5  47 4 5 o a o o o o o o a o n o o So e o a a a o a no Pa e Pe PLE E eser BO tN DOO MODO I SN OE 
LDK DE SO DE JS DE DE DP 9, 9,0 8 9,0, 0 0 DAIS DOSTANA I PS SS a he R ae t tutt utt dr EAE AE DEEE DE IDE DE IE JE DENE DE DE DIE DE DENE BEE a e ae aa e a a a a a E a NEDE DESK o o o o^ e DEDE o o DE 


OPENIN OPENOUT OPENUP - Rik Bean, Matthew Rapier 


The Basic filing commands are rather confusing as Acorn have changed the meanings of 
the OPEN words in Basic II. The commands are very much simpler in Basic II. 
Obviously the random access capability is only usable from the DFS. 


In Basic I, OPENIN opens a file for input and output. OPENOUT creates a file for 
output only. This is rather strange as the OSFIND call supports a purely input state 
as well. 


In Basic II, OPENIN is purely for input, OPENUP for input and output, and OPENOUT to 
create a file for output only. 


Thus in Basic II OPENUP is the same as the OPENIN in Basic I. You should note that 
Acorn have given the token for OPENIN in Basic I the word OPENUP in Basic II. Thus a 
Basic I program can be loaded on a Basic II machine, and will work perfectly, with 
OPENIN replaced by OPENUP. But if the program is typed in using Basic II, and you 
will later want to use it on a Basic I machine you MUST not use OPENIN, but use 
OPENUP instead 
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SPACE LORDS (32k) 


id D J Hoskins 


Play 


SPACE LORDS is great fun to play, and is one of the few two player games around. 
It is loosely based on the game of "asteroids", except in Space Lords each player 


moves his spaceship around the screen trying to blast his opponent's ship. 


runs in mode 1 and uses graphics and sound very well. 


The game 


Instructions for play are included in the program and are given when the game is 


run. Briefly though, each player uses a set of four 


keyboard to control his ship. 
asteroids type games. 


keys on each side of the 
Controls are similar to those used in most other 


If you are running the program from disc, you must set PAGE to &12ØØ before 


CHAINing it. 


1ø REM Space-Lords 

20 REM by D.J.Hoskins 

30 REM Version 1A 

4g *TVO,] 

50 *FX4,4 

60  ONERRORGOTO! 460 

70 PROCSET:F$-0 

80 MODE7:VDU23;8202;0;0 

98 MODE] :VDU23;8202; 0; 0 

100 GCOLØ,3:FORF=1T018Ø: PLOT 
79) ;RND(1Ø23) : NEXT 

119 COLOUR] : PRINTTAB (0,1) ; 51% : COLOUR2 
: PRINTTAB (39,1) ;S2% 

120 VDU5 

130 IFF%<>2A%=RND(6@@) : B%=RND(75Ø) +1Ø 
Ø:GC=1 : PROCMAT (A% , B%) :L=S 

140 IFF$<>1X%=RND(56Ø)+68Ø: YS-RND (750 
) 1090: GC2: PROCMAT (X2 , Y$) :R=S 

150 LL=L:RR=R:A=@ : B=@: X=0 : Y=0 

160 IFSI$-0ANDS2$-0RESTORE! 230 : FORF=1 
TO17:READF$,G$:SOUND&11,4,F2$,16: SOUND&! 
2,4,F%-48, 16:SOUND&13,4,F%,16:FORG=1TO 
(G$*99) :NEXTG,F 

170 IFINKEY (-98) =-1L=L-1 : IFL=ØL=8 

18Ø IFINKEY(-67)=-1L=L+1:IFL=9L=] 

198 IFINKEY(-97)<>-1G0T024Ø 


PROCINST 


69, RND (12 


Ø:Ø: 
Ø:Ø:19,1,6:Ø: 


For example: PAGE-&1200:CHAIN"SPLORDS" 


200 IFL=]ORL=20RL=8B=B+4 ELSEIFL<>3AN 


| D L<>7B=B-4 


219 IFL=20RL=3ORL=4A=A+4 ELSEIFL<>1AN 


| D L<>5A=A-4 


220 A-A MOD58:B-B MOD58 
230 SOUND&10,—-13,7,5:S0UND&11,0,190,5 
240 GCOL3, 1 :MOVEA%,B%:IFLL<>L VDU223+ 


|LL ELSE VDU223+L 


250 A%=A%+A:B%=B%+B : MOVEAS , BS : VDU223+ L 


260 IFINKEY (-9Ø)=-1R=R-1 : IFR=ØR=8 

270 IFINKEY (-1Ø6)=-1R=R+1 : IFR=9R=] 
280 IFINKEY(-42)«45-1GOTO330 

290 SOUND&10,—-13,7,5:S0UND&11,0,150,5 
300 IFR-lORR-20RR-8Y-Y-4 ELSEIFR<>3AN 


| D RO 7Y-Y-4 


319 IFR-20RR-3ORR-4X-X-HMELSEIFR«»]AND 
R<>5X=X-4 

320 X=X MOD58:Y=Y MOD58 

330 GCOL3,2:MOVEX%, Y% : IFRR<>R VDU223+ 
RR ELSEVDU223+R 

340 X%=X%+X:Y%=Y%+Y:MOVEX%, Y% : VDU223+ 
R:GCOL3,3 

350 IFINKEY(-2)--lPROCLINT 

360 IFINKEY(-74)--]PROCRINT 

370 IFO%=ØGOTO41Ø 

380 MOVENS ,M% : VDU255 : N%=N%+N sMZ=MS+M s 
MOVENS ,M$ : VDU255 

390 IFN%>12790RN%<-2Ø0ORM%<-2Ø0RM%>1Ø5 
40%=Ø 

400 IFN%>X%-36ANDN%<X%+24ANDM%>Y%-34A 
NDM3<Y%+26F%=2 :GOTO820 

410 IFW%=ØG0T045Ø 

420 MOVEJ$,K%:VDU255:J%=J%+J:K%=K%+K: 
MOVEJ% ; K3 : VDU255 

430 IFJ%>12790RIJ%<-2Ø0RK%<-2Ø0RK%>1Ø5 
AWS=Ø 

440 IFJ%>A%-36ANDJ%<A%+24ANDK%>B%-34A 
NDK%<B%+26F%=1 : GOTO820 

450 IFB>.2B=B-.5ELSEIFB<ØB=B+.5 

460 IFA>.2A=A-. 5|ELSEIFA<@A=A+. 5 

470 IFX>.2X=X-—. 5SELSEIFX<ØX=X+.5 

480 IFY».2Y=Y-.5ELSEIFYSØY=Y+.5 
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1Ø6ØG0T052Ø 
5ØØ IFX%>129ØX%=-3Ø ELSEIFX%<-32X%=12 
84 
510 IFY%>1Ø6ØYS=-24 ELSEIFY%<-24Y%=1|Ø 
6Ø 
520 IFA%<129ØANDA%>-32ANDB%>-24ANDBS< 
1060GOTO550 
530 IFA$»1290A$--30 ELSEIFA$«-32A$-12 
84 j 
540 IFB%>1060B%=-24 ELSEIFB%<—24B3=1¢ 
60 
550 LL=L:RR=R 
560 GOTO179 
565 
570 DEFPROCLINT 
580 IFO%<>ØMOVEN% ,M%:VDU255 
590 N=Ø:M=Ø:0%=1 :N%=A% : M$=B% : SOUNDS 1 3 
£12150, 2: MOVENS , M% : VDU255 
600 IFL-lORL-2O0RL-8M-48 ELSEIFL<>3AND 
L<>7M=-48 
610 IFL-2ORL-3ORL-4N-48 ELSEIFL<>1AND 


L<>5N=-48 
62Ø ENDPROC 
625 


63Ø DEFPROCRINT 
640 IFW$<>ØMOVEJS,K$:VDU255 
650 J=Ø:K=Ø:W3=1| :J%=X%:K3=Y%: SOUND& 12 
71, 18Ø,2:MOVEJS , K%:VDU255 
660 IFR-lORR-20RR-8K-48 ELSEIFR<>3AND 
RC 7K--48 
670 IFR=2ORR=3ORR=4J=48 ELSEIFR<>1AND 
R<>5J=-48 
680 ENDPROC 
685 
690 DEFPROCMAT (I$,E$) :GCOL3,GC 
709 VDU29,12416;E$-16; 
718 SOUND&11,0,0,0:SOUND&10,-15,7,255 
720 FORF=ØTO9:U% (0, F)- (RND(30) -15) *25 
Ø: U$ (1,F) - (RND(3Ø) -15) *250:0=U (Ø, F) :W= 
US (1, F) : PLOT69, Q,W: PLOT69 ,Q-4 ,W: PLOT69, 
Q,W+4: PLOT69 , O+4 ,W+4 : NEXT 
730 FORG=1T03:FORF=0TO9 : Q=U3 (Ø,F) :W=U 
$(1,F 
SAG EE beer Aas 
75Ø PLOT69,Q,W:PLOT69,0+4,W: PLOT69,0, 
W+4: PLOT69, Q+4 ,W+4 
760 Q=0%.2:W=W*.2 
770 PLOT69,0,W:PLOT69,0+4,W:PLOT69,0, 
Wt4:PLOT69 ,O+4 ,W+4: U$ (Ø, F) =0: Ug (1, F) =W 
| 780 NEXT:NEXT:GCOLØ,Ø 
798 FORF=ØTO9 :Q=U% (Ø, F) :W=U% (1, F) :PLO 
T69 ,Q,W: PLOTG9 , Q-4 ,W: PLOT69 , Q, W+4 : PLOTG 
9,Q-4,W-4: SOUND& 11,0, F*20 , 5: NEXT 
800 GCOL3,GC:VDU29,0;0; :MOVEIS,ES:S-R 
ND (8) : VDU2234S 
810 SOUND&11,0,0,0:SOUND&10, Ø, Ø, Ø: END 
PROC 
820 IFF$-11$-A$:E$-B$:P$-L 
830 IFF3=21%=X%:E%=Y%:P%=R 


490 IFX$«1290ANDX$2-32ANDYS»-24ANDY&« 840 GCOL3,3:IFF$-2 


DU255: O&-ÜELSEIFWS«»ÜANDF$-1MOVEJ$ ,K$:V 
DU255:W%=Ø 

850 GCOL3,F%:MOVEI$, ES : VDU223+P% 

860 VDU29,1%+16;E%-16; | 

870 SOUND&11,2,200,255: SOUND&10 ,—15,7 
7255. 

880 FORF=ØTO9STEP2:U% (0, F) = (RND(190) - 
SØ) *2:U$ (1, F) (RND (1ØØ) -5Ø) *2:US (D, F1) 
=RND (49) -28: US (1, F+1) =RND (4Ø) -20:MOVE U 
(ØF) ,US(1,F) :DRAW U%(Ø,F+1) ,US(1,F+1) 
s NEXT 

890 FORG=1.5T01 .2STEP-.Ø5: FORF=ØTO9ST 
EP2 

9ØØ MOVE U$(Ø,F) ,US(1,F) :DRAW U%(Ø,F+ 
1) ,US(1,F+1) 

910 U%(Ø,F)=U%(Ø,F) *G:US(1,F) =U% (1,F) 
*G 3: U$ (Ø,F+1) =U% (Ø,F+1) *G: US (1,F+1) =U3 (1 
F+1) *G 

920 MOVE U%(Ø,F) ,U%(1,F) sDRAW U%(0,F+ 
1) ,US(1,F+1) sNEXTF,G 

930 SOUND&11,0,0,0: SOUND&10,0,0, Ø: FOR 
F=ØTOOSTEP2:MOVE U%(Ø,F) ,U%(1,F) :DRAW U 
$(Ø,F+1) ,U%(1,F+1) sNEXTF 

94Ø *FX15,0 

950 IFF$=251%=51%+1ELSES2%=52%+1 

96Ø VDU4:COLOUR1 : PRINTTAB(Ø,1) ;:S1$:CO 
LOUR2: PRINTTAB (39,1) ; S2$ 

970 FORF=1TO15:G=280+RND (15) : SOUND& 11 
r 3/G, 2: SOUND& 12, 3,G-48 , 2: FORH=] TORND (12 
Ø) sNEXTH,F 

980 VDU29,0;0;  . 

998 FORF=1TO3ØØØ: NEXT 

1ØØØ IFS1%<3ANDS2%<3GOTO11Ø 

1Ø1Ø RESTORE] 24@:FORF=1T033:READH,G%:S 
OUND&11,4,H-48,16: SOUND&12,4,H-48,16:FO 
RG=1TO (G$*7Ø) sNEXTG,F 

1020 FORF=1TO3ØØØ:NEXT 

1030 PRINTTAB (Ø, Ø) ; : FORF=ØT03Ø: SOUNDS I 
2,-15,RND(255) , 1 : VDU] I : SOUND& I I ,=15, RND 
(255) , 1: SOUND& 13,-15, RND (255) , 1: FORG=1T 
025: NEXTG, F 

1040 MODE7:VDU23;8202;0;0;0;0 

1058 AS=" THE ":IFF%=1AS=AS+"RIGH 
T "ELSEIFF%=2AS=AS+"LEFT " 

1060 AS=AS+"HAND PLAYER WON. = 

1978 FORF=1TOLENAS : PRINTTAB (0,9) ; CHRS& 
86; RIGHTS (AS, F) : SOUND&11,-—15,ASC (RIGHTS 
(AS ,F) ) , I : FORG=1TO4Ø:NEXTG, F 

1080 *FX15,Ø 

1998 PRINTTAB(Ø,2Ø) ;CHR$157;CHR$&84;" 

PRESS SPACE TO START" 

1100 IFINKEY(Ø)<>32GOTO11ØØ 

1118 51%=Ø:52%=Ø3CLG :F3=Ø:03=Ø:W%=Ø:G0 
TO9Ø 

1120 END 

1125 

1138 DEFPROCSET 

1148 VDU23,224,24,24,36,36,66,9Ø,165, I 
NN NNN 

2 
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1158 VDU23,227,8,8,20,52,194, 
3,228,195,165,90,66,36,36,24,24,23,229, 
16,16,40,44,67,76,176,192 

1160 VDU23,230,3,13,50,196,196,50,13,3 
7237231 ,192,176,76,67,44,49,16,16,23,25 
5,0,0,0,24,24,0,0,0 

1170 DIMU$ (1,10) :51%=Ø:52%=Ø: 0%=Ø:W3=Ø 

1189 ENVELOPE] g ] £718,-5,-2,2,10,300,0, 
0,0,—3,126,0 

1198 ENVELOPE2,2,-1,-1,-1,200,200,200, 
0,0,0,—126,0,0 
1200 ENVELOPE3,1,-7,-7,-7,200,200,200, 
0,0,0,—-5,126,0 
1218 ENVELOPE4,1,0,0,0,200,200,200,0,— 
1,0,-126,126,0 
1220 ENDPROC 

1225 

1230 DATA1@1,5,121,2,129,2,137,4,137,4 
,129,4,141,4,137,4,1801,4,93,4,137,2,121 
,2,129,4,93,4,89,4,117,4,121,16 
1240 DATA149,6,149,4,137,2,141,2,149,4 
,169,4,165,4,149,4,149,4,149,4,137,2,14 
1,2,149,4,169,4,165,4,149,4,149,4,169,4 
;,185,2,177,2,169,4,149,4,157,4,157,2,14 
9,2,157,4,129,4,129,4,137,4,141,4,149,4 
7:137,4,121,8 
1245 

1250 DEFPROCINST 
1260 FORF-1TO2:PRINTTAB(5,F);CHRS$141;C 
HR$129;CHR$136;"»»5]]]]SPACE-LORDS[ [ [ [<< 
" NEXT 

1270 PRINTTAB(Ø,3) ;CHR$&84;"V. 1.2";CH 
R$&82;" ";CHR$&84;"David J. Hoskins." 

1288 PRINTTAB(Ø,5) ;CHR$&86;"This is a 
TWO player game of skill and ";CHR$&86; 
"strategy.";TAB(Ø) ;CHRS&83;"The object 
of the game is to blow your ";CHR$&83;" 
. opponent up three times to win." 

1299 PRINTCHRS&82:"The two space ships 
drift in space"SPC(5);CHR$&82;"thruste 
d around by the keys:";TAB(0);CHR$&86;" 
""TAB""-LEFT HAND PLAYER (CYAN) ";TAB(Ø) ; 
CHRS&83"""CURSOR DOWN""-RIGHT HAND PLAY 
ER (YELLOW) " 

1308 PRINTTAB(@,13) ;CHRS&85;"When thru 
sting you go in the direction ";CHR$&85 
;"you are pointing." 


LOWER CASE FILE NAMES ~- Malo Hautus 


— 


1319 | 2 

ships use the keys:";" 
LEFT HAND PLAYER. 200000"; TAB (Ø) ; CHR$&86 
QUUUZUU-ROTATE LEFT  ""X""-ROTATE RIGHT 
90 

132Ø PRINT" 
PLAYER. oo vee 

1338 PRINTCHRS&83;"""DELETE""-ROTATE L 
EFT ""COPY""—ROTATE " s CHRS&83 2 "RIGH 
que 

1340 PRINTCHR$&85"NB- IF YOU GO OFF TH 
E SCREEN YOU WILL  ";CHR$&85;"APPEAR ON 

THE OTHER SIDE." 

1350 PRINT" 
TINUE" 

1360 IFINKEY(@) <>32GOTO1369 ELSECLS 

1370 FORF-1TO2:PRINTTAB (5,F) ;CHR$141;C 
HR$139;CHRS$136;"»»]]1]]SPACE-LORDS[ [ [ [<< 
"NEXT 

138@ PRINTTAB(2,4);"To fire use the ke 
ys:";TAB(4) ;CHR$&86; """CTRL""-LEFT HAND 

PLAYER." ; TAB (4) ; CHR$&83; """RETURN" "-RI 
GHT HAND PLAYER." 

139Ø PRINT:PRINT"* IF YOU FIRE WHILE Y 
OUR LASER IS STILL IN THE AIR YOUR FIRS 
T ONE WILL DISAPPEARAND A NEW ONE WILL 
BE FIRED." 

14ØØ PRINT:PRINTCHRS&81;"When a player 

is ZAPPED he/she will " +CHRS&81 : "ma 
terialise randomly on the screen." 

1410 PRINTCHR$&86;"If you go too fast 
your engines will ";CHR$&86;"ABORT,st 
opping you instantly. But not ";CHRS&8 
6;"for GOOD -You can quickly regain pow 
er." 

1420 PRINTTAB(Ø,17) ;CHRS&82;"The space 

ships cannot collide, and you" ;CHRS$&82 
;"cannot be hit by your own laser." 


1440 PRINTTAB(9,23)" PRESS SPA 
CE TO BEGIN" 

1450 REPEAT UNTIL GET-32:ENDPROC 

1460 ONERROROFF 

1478 *FX4 

1480 MODE7:1IFERR-]7END 

1499 REPORT:PRINT" at line ";ERL 

1500 END 


FOR THE RIGHT HAND 


PRESS SPACE TO CON 


The disc filing system does not distinguish between lower and upper case. If you 


have a program called ‘'fred' 


then saving another program called 'FRED' will 


overwrite the earlier one, and some versions of the DFS may leave the lower case 


"fred' as the name stored 


lower case file name into the same upper case name. 
something different, and then *RENAME it back again. 


You have to *RENAME 


in the catalogue. It can prove difficult to convert a 
it to 
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BEEBCALC 
OFFER STARTS ON 15th AUGUST 


We are pleased to announce that we are now able to offer the new BEEBCALC spread 
sheet program for sale to members. Using BEEBCALC you can set up a table of figures 
or other information and specify the connections between these entries. Changing any 
one part of the display ensures that the rest of the display is immediately updated 
to match. It is particularly useful for exploring and analysing many financial 
applications including home and personal finance. 

The program, which is in ROM, is produced by Computer Concepts (the suppliers of 
Wordwise). It is a powerful tool, with many features, including: 

Full floating point maths; Use of both 40 and 80 column modes; Variable column 
width; Total cassette or disc system compatibility; Variable numbers of decimal 
places; Immediate re-calculation of values; Full printout without the need for 
special printer drivers. 

In fact, it is very fast and simple to use. It is ideal for small business use, as 
well as being useful in the home and to the hobbyist. 
LNOTE: BEEBCALC requires a series 1 0.S.] 


The normal sale price for BEEBCALC is £40 Cinclusive of VAT). 

We are able to offer it to members at £35 fully inclusive of VAT and p&p. 

Price to members outside UK is also £35 which includes the extra p&p but NOT VAT. 
Cheques MUST be in 'Pounds Sterling'. 


ADDRESS FOR BEEBCALC (Plus inclusive 1.2 ROM if ordered) Beebcalc Offer, PO BOX 50, 
St Albans, Herts, AL1 2AR. | 
THIS OFFER DOES NOT START UNTIL 15th AUGUST | MM 


VISE Word Processor 


xd NEW PRICE NOW ONLY £38 see 
tekst LLL LLL LLL LLL EET EET TET 


This is a highly sophisticated word processing package for the BBC Micro, and 
compares favourably with those currently available on other microcomputers. It 
makes full use of the BBC Micro's advanced facilities, and text is typed and edited 
in the 40 column Teletext mode, saving memory, thus allowing it to be used with more 
or less any TV. Wordwise will work equally well on cassette or disc based systems, 
and it is easy to transfer files from cassette to disc if you upgrade at a later 
date. 


The text for BEEBUG magazine is produced entirely using Wordwise. If you would Like 
further details of the facilities and features offered by Wordwise please send an A5 
SAE. 

CNOTE: Wordwise requires a series 1 0.5.) 
AAKKKKKKK Wordwise now includes a free "TYPING TUTOR" program drekk 


The normal sale price of Wordwise is £46 (inclusive of VAT). 

To.BEEBUG members the price has been reduced even further than before to: £38 fully 
inclusive of VAT and p&p. 

Price to members outside UK is also £38, this includes the extra p&p but NOT VAT. 
Cheques MUST be in ‘Pounds Sterling’. 


ADDRESS FOR WORDWISE (Plus inclusive 1.2 ROM if ordered) Wordwise Offer, PO BOX 50, 
St Albans, Herts, AL1 2AR. . 


WONDEDOGODDEDEADDLUDEDORUDOERONORDODADONORDEDOUGOEORDOUREDEROUBEGUDDNOOOEODOGUDDNNODEDEDEOGOREDROGEGDDEDELOUDSDODUCOEDEDONGOGODGEOODEDENGECEDSNNOSEGENNUOUGENOOGUQUGONGUSEONLONNEAANGOOESEUGEBEDUEONGEQ0N0NONNCUERE0NNONNECqNGN 


WORDWISE OR BEEBCALC PLUS 1.2 ROM 


Go eee EEE 220023536002 LO LL CCL ETTE ETTE EET EEE COPECOCOCECOCCELCCOLCLCCEELOCECLOCECLCOULCECECE COL DOLOR 0022008 C EO CE CCLUCLCCEEE LECCE E DOO 202000 


We can supply the 1.2 ROM with your Wordwise or Beebcalc order for an extra £5, 
(Total price for Wordwise + 1.2 ROM is £43. Beebcalc + 1.2 ROM is £40). 

Once Wordwise and Beebcalc have been ordered we cannot later supply the 1.2 ROM at 
the special discount of £5. 

Orders must be sent to the same address as for Wordwise/Beebcalc =- PO Box 50, 
St Albans, Herts, ALT AR. 


MULTIPLE ORDERS: We can offer generous discounts on multiple orders of Wordwise or 
Beebcalc in excess of two, please send an SAE, together with your requirements, for 
a quotation. | 


RTS 


MOO Le SIR UNIS E mm 


IF YOU WRITE TO US 


SEERE EET 
ee ad 


BACK ISSUES (Members only) SUBSCRIPTIONS 

ALL back issues are kept in print (from Send all applications for membership, 
April 1982). Send 90p per issue PLUS an subscription renewals, and subscription 
A5 SAE to the subscriptions address. queries to the subscriptions address. 
This offer is for members only, so it 

is ESSENTIAL to quote your membership MEMBERSHIP COSTS: 

number with your order. Please note £5.40 for 6 months (5 issues) 
that the BEEBUG Reference Card and £9.90 for 1 year (10 issues) 
BEEBUG supplements are not supplied European Membership £16 for 1 year. 
with back issues. Elsewhere (Postal zones) 


E Zone A £19, Zone B £21, Zone C £23 
Subscriptions & 


Software Address SOFTWARE AND ROM OFFER (Members only) 
»ottware nadre»» Se É———————— 
BEEBUG These are available from the 


NOTE OUR NEW 


SUBSCRIPTIONS PO BOX 109 subscription address, which is our NEW 
ADDRESS Baker Street software address also. (Note that this 
High Wycombe does not apply to Wordwise or Beebcalc 
Bucks - in this instance please see magazine 

HP11 2TD for details). 


IDEAS, HINTS & TIPS, PROGRAMS, AND LONGER ARTICLES 


Substantial articles are particularly welcome and we Editorial Address, 


will pay around £25 per page for these, but in this BEEBUG 
case please give us warning of anything that you PO Box 50 
intend to write. In the case of material longer St Albans 
than a page, we would prefer this to be submitted on Herts 
cassette or disc in machine readable form using AL] 2AR 


"Wordwise", "Minitext Editor" or other means. If you 
use cassette, please include a backup copy at 309 
baud. 

We will also pay £19 for the best Hint or Tip that we publish, and £5 to the next 
best. Please send all editorial material to the editorial address opposite. If you 
require a reply it is essential to quote your membership number and enclose an SAE. 


BEEBUG MAGAZINE is edited and produced by Sheridan Williams and Dr David Graham. 
Technical Editor: Colin Opie. Production Editor: Phyllida Vanstone. 


Technical Assistant: Alan Webster. 
Thanks are due to John Yale, Adrian Calcraft, Tim Powys-Lybbe, Graham Greatrix 


and Matthew Rapier for assistance with this issue. 


ALL reasonable precautions are taken by BEEBUG to ensure that the advice and data 
given to readers are reliable. We cannot, however, guarantee it, and we cannot 
accept legal responsibility for it, neither can we guarantee the products reviewed 
or advertised. BEEBUG (c) August 1983 


A special arrangement has been agreed between Acorn and BEEBUG whereby BEEBUG 
members may obtain the Series One Machine Operating System in ROM at the price of 


£5.85 including VAT and post and packing. 
The ROM will be supplied with fitting instructions to enable members to install 


it in their machine. 

If the computer does not subsequently operate correctly, members may take their 
machines to an Acorn dealer for the upgrade to be tested, which will be done at a 
charge of £6.00 plus VAT. This charge will be waived if the ROM is found to have 
been defective. If the computer has been damaged during the installation process, 


the dealer will make a repair charge. 


Please note that we cannot accept EPROM-based operating systems (0.1 or 4.0) in 
Lieu of payment. This can only be performed by Acorn dealers or by Acorn's service 


centre at Feltham, and applies only to users of the 0.1 0.5. 


ADDRESS FOR 1.2 O.S. IF ORDERED ON ITS OWN:- ROM Offer, BEEBUG, PO Box 109, 
High Wycombe, Bucks, HP11 21D. PLEASE ALLOW 28 DAYS FOR DELIVERY. 


_ To save wear and tear on fingers and 
brain, we are offering each month a 
cassette of the programs featured in 
the latest edition of BEEBUG. The first 
program on each tape is a menu program, 
detailing the tape's contents, and 
allowing the selection of individual 
programs. The tapes are produced to a 
high technical standard by the process 
used for the BEEBUGSOFT range of 
titles. Ordering information, and 
details of currently available 
cassettes are given below. 


Previous cassettes: Vol.1 No.10, 
No.1, Vol.2 No.2, Vol.2 No.3 


month's cassette (Vol.2 No.4) 
> Big Characters: *CODE and 
examples; Files Example: Model A 
nd Model B Mars Lander; Spider's Web; 
pson 8-Tone Dump (both article and 
rogram); Space Lords; Paintbox; Dual 
creens; Two Programs Using the 6845; 
irnbaum's Book Index; Cassette to 
isc; and Crossword Answers. | 
or ordering information see BEEBUGSOFT 
dvertisement at the back of this 
onth's magazine supplement. 


ASSETTE SUBSCRIPTION ADDRESS: 

Lease send a sterling cheque with 
order, together with your membership 
number and the date from which the 
subscription is to run, tos 
Cassette Subscription, 
PO Box 109 Baker Street, 
Bucks, HP11 2TD. 


Vol.2 


BEEBUG, 
High Wycombe, 


BEEBUG MAGAZINE BINDER OFFER 
eea e ee EER 


A hard-backed . binder for 

magazine is now available. 
binders are dark blue in 
"BEEBUG! in gold 
spine. They allow you to use the 


a single reference book. 


subscription 


BEEBUG 
These 
colour with 
lettering on the 
whole 
of the first volume of the magazine as 


Individual 


issues may be easily added or removed. 
The binders will also conveniently hold 
less than 10 issues, so that you can 
use it while you build up Volume 2 
also. 


MAGAZINE CASSETTE SUBSCRIPTION 
EEE 
oo 
We are now able to offer members 
subscriptions to our magazine 
cassettes. Subscriptions will be for a 
period of one year and are for ten 


‘consecutive issues of the cassette. If 


required, subscriptions may be 
backdated as far as Vol.1 No.10, which 
was the first issue available on 
cassette. This offer is available to 
members only, so when applying for 
please write to the 
address below, quoting your membership 
number and the issue from which you 
would like your subscription to start. 


CASSETTE SUBSCRIPTION PRICE: 
UK £33 inc VAT and p&p 
OVERSEAS (inc Eire) £39 inc p&p 
(no VAT payable). 


BINDER PRICE 
U.K. £3.90 inc p&p, and VAT. 
Europe £4.90 inc p&p (VAT not charged) 
Elsewhere £5.90 inc p&p 
(VAT not charged) 


Make cheques payable to BEEBUG. 

Send to Binder Offer, BEEBUG, 
PO Box 109, Baker Street, High Wycombe, 
Bucks, HP11 2TD. Please allow 28 days 
for delivery on U.K. orders. 


-PLease note that if you are ordering a 
binder now, you will not receive your 
binder until mid-August, we apologise 
for this, but have had to re-order. 


